Mercurial > emacs
changeset 19220:4a2dbee243f9
(fill-context-prefix): Accept a whitespace
prefix from the second line, regardless of the first line.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 07 Aug 1997 20:51:57 +0000 |
| parents | 67d2c89a660c |
| children | d125603385f7 |
| files | lisp/textmodes/fill.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/fill.el Thu Aug 07 18:54:49 1997 +0000 +++ b/lisp/textmodes/fill.el Thu Aug 07 20:51:57 1997 +0000 @@ -210,13 +210,13 @@ ;; If we get a fill prefix from the second line, ;; make sure it or something compatible is on the first line too. (and second-line-prefix first-line-prefix + ;; If the first line has the second line prefix too, use it. (if (or (string-match (concat "\\`" (regexp-quote second-line-prefix) "\\(\\'\\|[ \t]\\)") first-line-prefix) - (and (string-match "\\`[ \t]+\\'" second-line-prefix) - (>= (string-width first-line-prefix) - (string-width second-line-prefix)))) + ;; If the second line prefix is whitespace, use it. + (string-match "\\`[ \t]+\\'" second-line-prefix)) second-line-prefix)) ;; If we get a fill prefix from a one-line paragraph, ;; maybe change it to whitespace,