diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2007-04-01 19:35:32 +0000 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2007-04-01 19:35:32 +0000 |
commit | 8ae799ba73eecc636ce2b877d4bee1b90b634252 (patch) | |
tree | 7153c8b7afd4ed83702414f8e204f4887ebceeb4 /lisp/emacs-lisp/lisp-mode.el | |
parent | 5605893d03d128a088eca3ea36af392bf7d111eb (diff) | |
download | emacs-8ae799ba73eecc636ce2b877d4bee1b90b634252.tar.gz emacs-8ae799ba73eecc636ce2b877d4bee1b90b634252.tar.bz2 emacs-8ae799ba73eecc636ce2b877d4bee1b90b634252.zip |
(lisp-fill-paragraph): Only obey emacs-lisp-docstring-fill-column in
emacs-lisp-mode.
Diffstat (limited to 'lisp/emacs-lisp/lisp-mode.el')
-rw-r--r-- | lisp/emacs-lisp/lisp-mode.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index 09cb8436c89..164756dfdc3 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -1280,7 +1280,8 @@ and initial semicolons." "\\|\\s-*\\([(;:\"]\\|`(\\|#'(\\)")) (paragraph-separate (concat paragraph-separate "\\|\\s-*\".*[,\\.]$")) - (fill-column (if (integerp emacs-lisp-docstring-fill-column) + (fill-column (if (and (integerp emacs-lisp-docstring-fill-column) + (derived-mode-p 'emacs-lisp-mode)) emacs-lisp-docstring-fill-column fill-column))) (fill-paragraph justify)) |