aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/progmodes/fortran.el6
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