Mercurial > emacs
changeset 23838:e494267843f7
(fortran-check-end-prog-re): Allow trailing
comment.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Wed, 09 Dec 1998 16:38:37 +0000 |
| parents | 5351ccb857f6 |
| children | 2dcf9631cad2 |
| files | lisp/progmodes/fortran.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/fortran.el Wed Dec 09 01:08:50 1998 +0000 +++ b/lisp/progmodes/fortran.el Wed Dec 09 16:38:37 1998 +0000 @@ -925,7 +925,7 @@ ;; 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)))))))