aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKenichi Handa1999-07-26 00:29:37 +0000
committerKenichi Handa1999-07-26 00:29:37 +0000
commit9d289ed7c77100035a41cbd21f4254c8a41d2ec7 (patch)
treeb9270c02b2c7182cb60492976ff445034f00b9be
parent7141e1e0ffb4a1846f7054c41a1e98598b8ee6c3 (diff)
downloademacs-9d289ed7c77100035a41cbd21f4254c8a41d2ec7.tar.gz
emacs-9d289ed7c77100035a41cbd21f4254c8a41d2ec7.zip
(fill-region-as-paragraph): Fix previous change.
-rw-r--r--lisp/textmodes/fill.el7
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el
index 020e831bb39..b600cd91031 100644
--- a/lisp/textmodes/fill.el
+++ b/lisp/textmodes/fill.el
@@ -546,10 +546,9 @@ space does not end a sentence, so don't break a line there."
546 ;; character to find the correct break point. 546 ;; character to find the correct break point.
547 (if (not (and (eq (charset-after (1- (point))) 'ascii) 547 (if (not (and (eq (charset-after (1- (point))) 'ascii)
548 (eq (charset-after (point)) 'ascii))) 548 (eq (charset-after (point)) 'ascii)))
549 (fill-find-break-point 549 (fill-find-break-point (+ linebeg
550 (+ linebeg 550 (current-left-margin)
551 (current-left-margin) 551 (length fill-prefix))))))
552 (if fill-prefix (length fill-prefix) 0))))))
553 552
554 ;; If the left margin and fill prefix by themselves 553 ;; If the left margin and fill prefix by themselves
555 ;; pass the fill-column, keep at least one word. 554 ;; pass the fill-column, keep at least one word.