# HG changeset patch # User Richard M. Stallman # Date 797371541 0 # Node ID 97b1aef779dc1d46809bcebd4d255cc7a15325d9 # Parent 7823947372f98c0f8ccefa00a07d761db7257983 (ispell-message): Make mail-header-separator into regexp. diff -r 7823947372f9 -r 97b1aef779dc lisp/textmodes/ispell.el --- a/lisp/textmodes/ispell.el Sat Apr 08 19:52:50 1995 +0000 +++ b/lisp/textmodes/ispell.el Sat Apr 08 20:05:41 1995 +0000 @@ -2132,7 +2132,7 @@ (forward-line 1)) (setq case-fold-search nil) ;; Skip mail header, particularly for non-english languages. - (if (looking-at mail-header-separator) + (if (looking-at (concat (regexp-quote mail-header-separator) "$")) (forward-line 1)) (while (< (point) limit) ;; Skip across text cited from other messages.