procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(fill-region-as-paragraph): Fix previous change.

Browse source
This commit is contained in:
Karl Heuer 1999-07-27 20:06:20 +00:00
parent 071ebee939
commit e7029763ca
1 changed files with 7 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lisp/textmodes/fill.el
View file

@ -546,9 +546,13 @@ 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
(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.