From bd6cabcf14906e3ca108e914702715aa35288d4b Mon Sep 17 00:00:00 2001 From: Dave Love Date: Wed, 9 Dec 1998 16:38:37 +0000 Subject: [PATCH] (fortran-check-end-prog-re): Allow trailing comment. --- lisp/progmodes/fortran.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el index 10ff6f93a23..004fe946436 100644 --- 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))))))) -- 2.39.2