/[emacs]/emacs/lisp/emacs-lisp/lisp-mode.el
ViewVC logotype

Diff of /emacs/lisp/emacs-lisp/lisp-mode.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.180 by lute, Mon Jul 4 17:33:35 2005 UTC revision 1.181 by monnier, Mon Jul 4 20:13:34 2005 UTC
# Line 172  Line 172 
172    (setq paragraph-ignore-fill-prefix t)    (setq paragraph-ignore-fill-prefix t)
173    (make-local-variable 'fill-paragraph-function)    (make-local-variable 'fill-paragraph-function)
174    (setq fill-paragraph-function 'lisp-fill-paragraph)    (setq fill-paragraph-function 'lisp-fill-paragraph)
175      ;; Adaptive fill mode gets the fill wrong for a one-line paragraph made of
176      ;; a single docstring.  Let's fix it here.
177      (set (make-local-variable 'adaptive-fill-function)
178           (lambda () (if (looking-at "\\s-+\"[^\n\"]+\"\\s-*$") "")))
179    ;; Adaptive fill mode gets in the way of auto-fill,    ;; Adaptive fill mode gets in the way of auto-fill,
180    ;; and should make no difference for explicit fill    ;; and should make no difference for explicit fill
181    ;; because lisp-fill-paragraph should do the job.    ;; because lisp-fill-paragraph should do the job.

Legend:
Removed from v.1.180  
changed lines
  Added in v.1.181

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26