From 2d060bebe753f34bdd55d36f9ff06bb669ef581c Mon Sep 17 00:00:00 2001 From: Dave Love Date: Wed, 8 Apr 1998 18:08:59 +0000 Subject: [PATCH] (fortran-fill-paragraph): This is the one which must return t, not: (fortran-fill-statement): --- lisp/progmodes/fortran.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el index a20b42a19b5..da30a95d0f7 100644 --- a/lisp/progmodes/fortran.el +++ b/lisp/progmodes/fortran.el @@ -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) -- 2.39.2