]> git.eshelyaron.com Git - emacs.git/commitdiff
(fill-context-prefix): Accept a whitespace
authorRichard M. Stallman <rms@gnu.org>
Thu, 7 Aug 1997 20:51:57 +0000 (20:51 +0000)
committerRichard M. Stallman <rms@gnu.org>
Thu, 7 Aug 1997 20:51:57 +0000 (20:51 +0000)
prefix from the second line, regardless of the first line.

lisp/textmodes/fill.el

index c1f44301a4be9c4f4714dfcb07179fbff785e0eb..88a685c25626a18a0eec66d52762e5b27909f2cb 100644 (file)
@@ -210,13 +210,13 @@ act as a paragraph-separator."
          ;; 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,