Mercurial > emacs
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