changeset 43883:b13e662ea2b3

(fortran-split-line): Make it work with any `!' comment as well.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 13 Mar 2002 16:42:47 +0000
parents e601e469e7a4
children eb248012bf4a
files lisp/progmodes/fortran.el
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/fortran.el	Wed Mar 13 16:33:56 2002 +0000
+++ b/lisp/progmodes/fortran.el	Wed Mar 13 16:42:47 2002 +0000
@@ -844,8 +844,10 @@
   (interactive)
   (delete-horizontal-space)
   (if (save-excursion
-	(beginning-of-line)
-	(looking-at fortran-comment-line-start-skip))
+	(let ((pos (point)))
+	  (beginning-of-line)
+	  (and (fortran-find-comment-start-skip 'all)
+	       (< (match-beginning 0) pos))))
       (insert ?\n (match-string 0))
     (if indent-tabs-mode
 	(insert ?\n ?\t (fortran-numerical-continuation-char))