From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Wed, 13 Mar 2002 16:42:47 +0000 (+0000)
Subject: (fortran-split-line): Make it work with any `!' comment as well.
X-Git-Tag: ttn-vms-21-2-B4~16193
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=894dc7e75d5298dbad72ca8307a93bbc6f89b16b;p=emacs.git

(fortran-split-line): Make it work with any `!' comment as well.
---

diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el
index 2ef875e1fe3..8d4d0131180 100644
--- a/lisp/progmodes/fortran.el
+++ b/lisp/progmodes/fortran.el
@@ -844,8 +844,10 @@ See also `fortran-window-create'."
   (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))