diff options
| author | Dave Love <fx@gnu.org> | 1998-04-08 18:08:59 +0000 |
|---|---|---|
| committer | Dave Love <fx@gnu.org> | 1998-04-08 18:08:59 +0000 |
| commit | 2d060bebe753f34bdd55d36f9ff06bb669ef581c (patch) | |
| tree | 81e375b6737d3f73ee714c8a35347e63a92ef211 /lisp | |
| parent | 79f13bba7dbc2352a18b4d8df8fa5c1b246f5b40 (diff) | |
| download | emacs-2d060bebe753f34bdd55d36f9ff06bb669ef581c.tar.gz emacs-2d060bebe753f34bdd55d36f9ff06bb669ef581c.tar.bz2 emacs-2d060bebe753f34bdd55d36f9ff06bb669ef581c.zip | |
(fortran-fill-paragraph): This is the one
which must return t, not:
(fortran-fill-statement):
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/progmodes/fortran.el | 6 |
1 files 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) |