diff options
author | Richard M. Stallman <[email protected]> | 1997-06-12 18:42:28 +0000 |
---|---|---|
committer | Richard M. Stallman <[email protected]> | 1997-06-12 18:42:28 +0000 |
commit | 536d3fc556cb4c158f60cda48d2679b1e6d6313e (patch) | |
tree | c83f011c7b0b67b60e06059454403a298ab92166 | |
parent | 48cd9fe9ec7989256bd7fa9ff715b40d0bbf4a3b (diff) |
(fill-context-prefix): Don't crash if RESULT is nil when AT-SECOND is t.
-rw-r--r-- | lisp/textmodes/fill.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el index 552bd4fb68..c3628be99f 100644 --- a/lisp/textmodes/fill.el +++ b/lisp/textmodes/fill.el @@ -200,10 +200,11 @@ act as a paragraph-separator." (if at-second ;; If we get a fill prefix from the second line, ;; make sure it's on the first line too. - (save-excursion - (forward-line -1) - (if (looking-at (regexp-quote result)) - result)) + (and result + (save-excursion + (forward-line -1) + (if (looking-at (regexp-quote result)) + result))) ;; If we get a fill prefix from a one-line paragraph, ;; maybe change it to whitespace, ;; and check that it isn't a paragraph starter. |