diff options
| author | Eli Zaretskii | 2004-10-08 17:54:43 +0000 |
|---|---|---|
| committer | Eli Zaretskii | 2004-10-08 17:54:43 +0000 |
| commit | e8a4208ec898d1285cb1cead459a0b01f9ad8ddf (patch) | |
| tree | e72ff53d4f2073ca1a671713188c558c39bfbd88 | |
| parent | 67e61e164db888e1357cb509b327d100167012a0 (diff) | |
| download | emacs-e8a4208ec898d1285cb1cead459a0b01f9ad8ddf.tar.gz emacs-e8a4208ec898d1285cb1cead459a0b01f9ad8ddf.zip | |
(lisp-fill-paragraph): Change
paragraph-start regexp so we don't fill code starting with #'(
| -rw-r--r-- | lisp/emacs-lisp/lisp-mode.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index 700fc5f80a8..da249076b91 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el | |||
| @@ -1182,7 +1182,7 @@ and initial semicolons." | |||
| 1182 | ;; The `fill-column' is temporarily bound to | 1182 | ;; The `fill-column' is temporarily bound to |
| 1183 | ;; `emacs-lisp-docstring-fill-column' if that value is an integer. | 1183 | ;; `emacs-lisp-docstring-fill-column' if that value is an integer. |
| 1184 | (let ((paragraph-start (concat paragraph-start | 1184 | (let ((paragraph-start (concat paragraph-start |
| 1185 | "\\|\\s-*\\([\(;:\"]\\|`\(\\)")) | 1185 | "\\|\\s-*\\([\(;:\"]\\|`\(\\|#'\(\\)")) |
| 1186 | (paragraph-separate | 1186 | (paragraph-separate |
| 1187 | (concat paragraph-separate "\\|\\s-*\".*[,\\.]$")) | 1187 | (concat paragraph-separate "\\|\\s-*\".*[,\\.]$")) |
| 1188 | (fill-column (if (integerp emacs-lisp-docstring-fill-column) | 1188 | (fill-column (if (integerp emacs-lisp-docstring-fill-column) |