changeset 16328:5aff0b539ae0

(forward-paragraph): Don't ever move forward again across a line if we stopped there because it doesn't start with the fill prefix.

--- a/lisp/textmodes/paragraphs.el	Wed Sep 25 07:17:18 1996 +0000
+++ b/lisp/textmodes/paragraphs.el	Wed Sep 25 07:20:19 1996 +0000
@@ -195,12 +195,14 @@
 			  (setq multiple-lines t))
 		      (forward-line -1))
 		    (move-to-left-margin)
-		    ;; Don't move back over a line before the paragraph
-		    ;; which doesn't start with fill-prefix
-		    ;; unless that is the only line we've moved over.
-		    (and (not (looking-at fill-prefix-regexp))
-			 multiple-lines
-			 (forward-line 1))
+;;; This deleted code caused a long hanging-indent line
+;;; not to be filled together with the following lines.
+;;;		    ;; Don't move back over a line before the paragraph
+;;;		    ;; which doesn't start with fill-prefix
+;;;		    ;; unless that is the only line we've moved over.
+;;;		    (and (not (looking-at fill-prefix-regexp))
+;;;			 multiple-lines
+;;;			 (forward-line 1))
 		    (not (bobp)))
 		(while (and (re-search-backward sp-paragraph-start nil 1)
 			    ;; Found a candidate, but need to check if it is a