From ca29a33e6a110dbf3c420a813513253b841303f9 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Fri, 23 Jul 1999 07:27:21 +0000 Subject: [PATCH] (fill-region-as-paragraph): Avoid backing up before left margin and fill-prefix by fill-find-break-point. --- lisp/textmodes/fill.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el index fe8e5250dc3..8d38e7f6e0f 100644 --- a/lisp/textmodes/fill.el +++ b/lisp/textmodes/fill.el @@ -546,7 +546,11 @@ space does not end a sentence, so don't break a line there." ;; 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. -- 2.39.5