aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <[email protected]>1997-06-12 18:42:28 +0000
committerRichard M. Stallman <[email protected]>1997-06-12 18:42:28 +0000
commit536d3fc556cb4c158f60cda48d2679b1e6d6313e (patch)
treec83f011c7b0b67b60e06059454403a298ab92166 /lisp
parent48cd9fe9ec7989256bd7fa9ff715b40d0bbf4a3b (diff)
(fill-context-prefix): Don't crash if RESULT is nil when AT-SECOND is t.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/textmodes/fill.el9
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.