Mercurial > emacs
changeset 25043:c0012b8a093e
(fill-region-as-paragraph): Avoid backing up
before left margin and fill-prefix by fill-find-break-point.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Fri, 23 Jul 1999 07:27:21 +0000 |
| parents | bf96605e00ee |
| children | e6c2ab650ebc |
| files | lisp/textmodes/fill.el |
| diffstat | 1 files changed, 5 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/fill.el Fri Jul 23 07:20:12 1999 +0000 +++ b/lisp/textmodes/fill.el Fri Jul 23 07:27:21 1999 +0000 @@ -546,7 +546,11 @@ ;; 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)))) + (fill-find-break-point + (+ linebeg + (current-left-margin) + (if fill-prefix (string-width fill-prefix) + 0)))))) ;; If the left margin and fill prefix by themselves ;; pass the fill-column, keep at least one word.