| OLD | NEW |
| 1 # Emacs | 1 # Emacs |
| 2 | 2 |
| 3 [TOC] | 3 [TOC] |
| 4 | 4 |
| 5 ## Debugging | 5 ## Debugging |
| 6 | 6 |
| 7 [Linux Debugging](linux_debugging.md) has some emacs-specific debugging tips. | 7 [Linux Debugging](linux_debugging.md) has some emacs-specific debugging tips. |
| 8 | 8 |
| 9 | 9 |
| 10 ## Blink Style (WebKit) | 10 ## Blink Style (WebKit) |
| (...skipping 43 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 54 may not yet be complete, but it covers the most common differences. | 54 may not yet be complete, but it covers the most common differences. |
| 55 | 55 |
| 56 Now that you have a WebKit specific style being applied, and assuming you have | 56 Now that you have a WebKit specific style being applied, and assuming you have |
| 57 font locking and it's default jit locking turned on, you can also get Emacs 23 | 57 font locking and it's default jit locking turned on, you can also get Emacs 23 |
| 58 to wrap long lines more intelligently by adding the following to your .emacs | 58 to wrap long lines more intelligently by adding the following to your .emacs |
| 59 file: | 59 file: |
| 60 | 60 |
| 61 ```el | 61 ```el |
| 62 ;; For dealing with WebKit long lines and word wrapping. | 62 ;; For dealing with WebKit long lines and word wrapping. |
| 63 (defun c-mode-adaptive-indent (beg end) | 63 (defun c-mode-adaptive-indent (beg end) |
| 64 "Set the wrap-prefix for the the region between BEG and END with adaptive fill
ing." | 64 "Set the wrap-prefix for the region between BEG and END with adaptive filling.
" |
| 65 (goto-char beg) | 65 (goto-char beg) |
| 66 (while | 66 (while |
| 67 (let ((lbp (line-beginning-position)) | 67 (let ((lbp (line-beginning-position)) |
| 68 (lep (line-end-position))) | 68 (lep (line-end-position))) |
| 69 (put-text-property lbp lep 'wrap-prefix (concat (fill-context-prefix lbp
lep) (make-string c-basic-offset ? ))) | 69 (put-text-property lbp lep 'wrap-prefix (concat (fill-context-prefix lbp
lep) (make-string c-basic-offset ? ))) |
| 70 (search-forward "\n" end t)))) | 70 (search-forward "\n" end t)))) |
| 71 | 71 |
| 72 (define-minor-mode c-adaptive-wrap-mode | 72 (define-minor-mode c-adaptive-wrap-mode |
| 73 "Wrap the buffer text with adaptive filling for c-mode." | 73 "Wrap the buffer text with adaptive filling for c-mode." |
| 74 :lighter "" | 74 :lighter "" |
| (...skipping 303 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 378 * `trybot.el`: import Windows trybot output into a `compilation-mode` buffer. | 378 * `trybot.el`: import Windows trybot output into a `compilation-mode` buffer. |
| 379 | 379 |
| 380 ## ERC for IRC | 380 ## ERC for IRC |
| 381 | 381 |
| 382 See [ErcIrc](erc_irc.md). | 382 See [ErcIrc](erc_irc.md). |
| 383 | 383 |
| 384 ## TODO | 384 ## TODO |
| 385 | 385 |
| 386 * Figure out how to make `M-x compile` default to | 386 * Figure out how to make `M-x compile` default to |
| 387 `cd /path/to/chrome/root; make -r chrome`. | 387 `cd /path/to/chrome/root; make -r chrome`. |
| OLD | NEW |