From: Glenn Morris <rgm@gnu.org>
Date: Wed, 12 Feb 2003 21:52:37 +0000 (+0000)
Subject: (fortran-fill): Fill lines that do not have comments.
X-Git-Tag: ttn-vms-21-2-B4~11220
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0ab47edc289ec1dcc674b94c92b901621462d025;p=emacs.git

(fortran-fill): Fill lines that do not have comments.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2d81a91486a..11a4acba970 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-02-12  Glenn Morris  <gmorris@ast.cam.ac.uk>
+
+	* progmodes/fortran.el (fortran-fill): Fill lines that do not have
+	comments.
+
 2003-02-12  Juanma Barranquero  <lektu@terra.es>
 
 	* files.el (file-truename): Revert change from 2002-11-27.
diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el
index 4552f4a50a0..e3a29289e89 100644
--- a/lisp/progmodes/fortran.el
+++ b/lisp/progmodes/fortran.el
@@ -1682,7 +1682,8 @@ If ALL is nil, only match comments that start in column > 0."
     ;; don't prevent a break.
     (when (and (save-excursion
 		 (beginning-of-line)
-		 (when (fortran-find-comment-start-skip)
+		 (if (not (fortran-find-comment-start-skip))
+                     t
 		   (goto-char (match-beginning 0))
 		   (>= (point) fill-point)))
 	       (save-excursion