changeset 40633:9e19d0344da5

(fill-region-as-paragraph): Don't forget to skip over current whitespace before looking for a preceding space.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 02 Nov 2001 03:10:31 +0000
parents 39fc5111667c
children 404ac8ca379a
files lisp/textmodes/fill.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/fill.el	Fri Nov 02 02:28:50 2001 +0000
+++ b/lisp/textmodes/fill.el	Fri Nov 02 03:10:31 2001 +0000
@@ -565,7 +565,9 @@
 		;; further fills will assume it ends a sentence.
 		;; If we now know it does not end a sentence,
 		;; avoid putting it at the end of the line.
-		(while (and (> (point) linebeg) (fill-nobreak-p))
+		(while (and (> (point) linebeg)
+			    (fill-nobreak-p)
+			    (skip-chars-backward " \t"))
 		  (if (re-search-backward " \\|\\c|.\\|.\\c|" linebeg 0)
 		      (forward-char 1)))
 		;; If the left margin and fill prefix by themselves