From: Richard M. Stallman Date: Fri, 26 Jan 1996 19:47:32 +0000 (+0000) Subject: (lisp-fill-paragraph): Use fill-paragraph once again for filling a comment. X-Git-Tag: emacs-19.34~1481 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b5e89ed1d70dfec2b857466ec3980ca63ce52e23;p=emacs.git (lisp-fill-paragraph): Use fill-paragraph once again for filling a comment. --- diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index d7b28049d4f..fcf1222fa2e 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -742,7 +742,7 @@ and initial semicolons." (save-excursion (while (and (zerop (forward-line -1)) (looking-at "^[ \t]*;"))) - ;; We may have gone to far. Go forward again. + ;; We may have gone too far. Go forward again. (or (looking-at ".*;") (forward-line 1)) (point)) @@ -756,7 +756,7 @@ and initial semicolons." (let ((paragraph-start (concat paragraph-start "\\|[ \t;]*$")) (paragraph-separate (concat paragraph-start "\\|[ \t;]*$")) (fill-prefix comment-fill-prefix)) - (fill-region (point-min) (point-max) justify t)))) + (fill-paragraph justify)))) t))