Mercurial > emacs
comparison lisp/textmodes/fill.el @ 25060:82d83822ab69
(fill-region-as-paragraph): Fix previous change.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Mon, 26 Jul 1999 00:14:37 +0000 |
| parents | c0012b8a093e |
| children | 2fef5f679d68 |
comparison
equal
deleted
inserted
replaced
| 25059:d6081fb56cda | 25060:82d83822ab69 |
|---|---|
| 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 |
| 550 (+ linebeg | 550 (+ linebeg |
| 551 (current-left-margin) | 551 (current-left-margin) |
| 552 (if fill-prefix (string-width fill-prefix) | 552 (if fill-prefix (length fill-prefix) 0)))))) |
| 553 0)))))) | |
| 554 | 553 |
| 555 ;; If the left margin and fill prefix by themselves | 554 ;; If the left margin and fill prefix by themselves |
| 556 ;; pass the fill-column, keep at least one word. | 555 ;; pass the fill-column, keep at least one word. |
| 557 ;; This handles the first line of the paragraph. | 556 ;; This handles the first line of the paragraph. |
| 558 (if (and (zerop prefixcol) | 557 (if (and (zerop prefixcol) |