Mercurial > emacs
changeset 25088:4b9caa006ac3
(fill-region-as-paragraph): Fix previous change.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Tue, 27 Jul 1999 20:06:20 +0000 |
| parents | 85b842300684 |
| children | 309fe4eb6522 |
| files | lisp/textmodes/fill.el |
| diffstat | 1 files changed, 7 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/fill.el Tue Jul 27 20:01:33 1999 +0000 +++ b/lisp/textmodes/fill.el Tue Jul 27 20:06:20 1999 +0000 @@ -546,9 +546,13 @@ ;; character to find the correct break point. (if (not (and (eq (charset-after (1- (point))) 'ascii) (eq (charset-after (point)) 'ascii))) - (fill-find-break-point (+ linebeg - (current-left-margin) - (length fill-prefix)))))) + ;; Make sure we take SOMETHING after the + ;; fill prefix if any. + (fill-find-break-point + (save-excursion + (goto-char linebeg) + (move-to-column prefixcol) + (point)))))) ;; If the left margin and fill prefix by themselves ;; pass the fill-column, keep at least one word.