aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1996-01-26 19:47:32 +0000
committerRichard M. Stallman1996-01-26 19:47:32 +0000
commitb5e89ed1d70dfec2b857466ec3980ca63ce52e23 (patch)
tree3b4d01047e7572d2926a29e59a591227acbc64ea
parent88c2fc2c6eb4f7626b16c8b27db1a04557461b31 (diff)
downloademacs-b5e89ed1d70dfec2b857466ec3980ca63ce52e23.tar.gz
emacs-b5e89ed1d70dfec2b857466ec3980ca63ce52e23.zip
(lisp-fill-paragraph): Use fill-paragraph once again for filling a comment.
-rw-r--r--lisp/emacs-lisp/lisp-mode.el4
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."
742 (save-excursion 742 (save-excursion
743 (while (and (zerop (forward-line -1)) 743 (while (and (zerop (forward-line -1))
744 (looking-at "^[ \t]*;"))) 744 (looking-at "^[ \t]*;")))
745 ;; We may have gone to far. Go forward again. 745 ;; We may have gone too far. Go forward again.
746 (or (looking-at ".*;") 746 (or (looking-at ".*;")
747 (forward-line 1)) 747 (forward-line 1))
748 (point)) 748 (point))
@@ -756,7 +756,7 @@ and initial semicolons."
756 (let ((paragraph-start (concat paragraph-start "\\|[ \t;]*$")) 756 (let ((paragraph-start (concat paragraph-start "\\|[ \t;]*$"))
757 (paragraph-separate (concat paragraph-start "\\|[ \t;]*$")) 757 (paragraph-separate (concat paragraph-start "\\|[ \t;]*$"))
758 (fill-prefix comment-fill-prefix)) 758 (fill-prefix comment-fill-prefix))
759 (fill-region (point-min) (point-max) justify t)))) 759 (fill-paragraph justify))))
760 t)) 760 t))
761 761
762 762