(fortran-check-end-prog-re): Allow trailing

comment.

diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el
index 10ff6f93a239bbb53272d2853f66ed82961ce2e3..004fe94643697997c8f3616965e2e6d52feb0cf9 100644 (file)
--- a/lisp/progmodes/fortran.el
+++ b/lisp/progmodes/fortran.el
@@ -925,7 +925,7 @@ Auto-indent does not happen if a numeric ARG is used."
   ;; Having got a possible match for the subprogram end, we need a
   ;; match of whitespace, avoiding possible column 73+ stuff.
   (save-match-data
-    (string-match "^\\s-*\\'"
+    (string-match "^\\s-*\\(\\'\\|\\s<\\)"
                  (buffer-substring (match-end 0)
                                    (min (line-end-position)
                                         (+ 72 (line-beginning-position)))))))