1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-03 10:31:37 -08:00

(fortran-fill-paragraph): This is the one

which must return t, not:
(fortran-fill-statement):
This commit is contained in:
Dave Love 1998-04-08 18:08:59 +00:00
parent 79f13bba7d
commit 2d060bebe7

View file

@ -1768,7 +1768,8 @@ Intended as the value of `fill-paragraph-function'."
(let (fill-paragraph-function)
(fill-region start end justify))) ; with normal `fill-paragraph'
(set-marker start nil)
(set-marker end nil)))))
(set-marker end nil))))
t)
(defun fortran-fill-statement ()
"Fill a fortran statement up to `fill-column'."
@ -1791,8 +1792,7 @@ Intended as the value of `fill-paragraph-function'."
(forward-line)
(fortran-remove-continuation)))
(fortran-previous-statement)))
(fortran-indent-line)
t) ; must return t for fill-paragraph
(fortran-indent-line))
(provide 'fortran)