changeset 11304:97b1aef779dc

(ispell-message): Make mail-header-separator into regexp.
author Richard M. Stallman <rms@gnu.org>
date Sat, 08 Apr 1995 20:05:41 +0000
parents 7823947372f9
children e39cb5447c68
files lisp/textmodes/ispell.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- 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.