diff options
| author | Dave Love <[email protected]> | 1998-12-09 16:38:37 +0000 |
|---|---|---|
| committer | Dave Love <[email protected]> | 1998-12-09 16:38:37 +0000 |
| commit | bd6cabcf14906e3ca108e914702715aa35288d4b (patch) | |
| tree | 3109f1d52674f9dabed7cd95d7adc50d4b15a54e /lisp/progmodes | |
| parent | 65cb17d5903bba5af1b4a232e7420a1535d2347d (diff) | |
(fortran-check-end-prog-re): Allow trailing
comment.
Diffstat (limited to 'lisp/progmodes')
| -rw-r--r-- | lisp/progmodes/fortran.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el index 10ff6f93a2..004fe94643 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))))))) |