1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

(fill-context-prefix): Don't crash if RESULT is nil when AT-SECOND is t.

This commit is contained in:
Richard M. Stallman 1997-06-12 18:42:28 +00:00
parent 48cd9fe9ec
commit 536d3fc556

View file

@ -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.