diff options
Diffstat (limited to 'lisp/progmodes')
| -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'." | |||
| 1768 | (let (fill-paragraph-function) | 1768 | (let (fill-paragraph-function) |
| 1769 | (fill-region start end justify))) ; with normal `fill-paragraph' | 1769 | (fill-region start end justify))) ; with normal `fill-paragraph' |
| 1770 | (set-marker start nil) | 1770 | (set-marker start nil) |
| 1771 | (set-marker end nil))))) | 1771 | (set-marker end nil)))) |
| 1772 | t) | ||
| 1772 | 1773 | ||
| 1773 | (defun fortran-fill-statement () | 1774 | (defun fortran-fill-statement () |
| 1774 | "Fill a fortran statement up to `fill-column'." | 1775 | "Fill a fortran statement up to `fill-column'." |
| @@ -1791,8 +1792,7 @@ Intended as the value of `fill-paragraph-function'." | |||
| 1791 | (forward-line) | 1792 | (forward-line) |
| 1792 | (fortran-remove-continuation))) | 1793 | (fortran-remove-continuation))) |
| 1793 | (fortran-previous-statement))) | 1794 | (fortran-previous-statement))) |
| 1794 | (fortran-indent-line) | 1795 | (fortran-indent-line)) |
| 1795 | t) ; must return t for fill-paragraph | ||
| 1796 | 1796 | ||
| 1797 | (provide 'fortran) | 1797 | (provide 'fortran) |
| 1798 | 1798 | ||