diff options
| author | Richard M. Stallman <rms@gnu.org> | 1996-01-26 19:47:32 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1996-01-26 19:47:32 +0000 |
| commit | b5e89ed1d70dfec2b857466ec3980ca63ce52e23 (patch) | |
| tree | 3b4d01047e7572d2926a29e59a591227acbc64ea /lisp/emacs-lisp | |
| parent | 88c2fc2c6eb4f7626b16c8b27db1a04557461b31 (diff) | |
| download | emacs-b5e89ed1d70dfec2b857466ec3980ca63ce52e23.tar.gz emacs-b5e89ed1d70dfec2b857466ec3980ca63ce52e23.tar.bz2 emacs-b5e89ed1d70dfec2b857466ec3980ca63ce52e23.zip | |
(lisp-fill-paragraph): Use fill-paragraph once again for filling a comment.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/lisp-mode.el | 4 |
1 files changed, 2 insertions, 2 deletions
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)) |