From b53ce41df657a9dce8f7740deefdc00bcd261e84 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 25 Sep 1996 07:20:19 +0000 Subject: [PATCH] (forward-paragraph): Don't ever move forward again across a line if we stopped there because it doesn't start with the fill prefix. --- lisp/textmodes/paragraphs.el | 14 ++++++++------ 1 file changed, 8 insertions(+), 6 deletions(-) diff --git a/lisp/textmodes/paragraphs.el b/lisp/textmodes/paragraphs.el index a7cc32b7413..775f0ea72a9 100644 --- a/lisp/textmodes/paragraphs.el +++ b/lisp/textmodes/paragraphs.el @@ -195,12 +195,14 @@ to which the end of the previous line belongs, or the end of the buffer." (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 -- 2.39.5