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 |