diff options
| author | Richard M. Stallman | 1995-04-08 20:05:41 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1995-04-08 20:05:41 +0000 |
| commit | e7a52e415f3290da7da22c90c1aa810c4743ebfe (patch) | |
| tree | 7cd3b601ab4bfeecbb5bba73bf754f2fad61bb29 | |
| parent | 50776640f7a1e3228f3ecf34c88ccea657febbad (diff) | |
| download | emacs-e7a52e415f3290da7da22c90c1aa810c4743ebfe.tar.gz emacs-e7a52e415f3290da7da22c90c1aa810c4743ebfe.zip | |
(ispell-message): Make mail-header-separator into regexp.
| -rw-r--r-- | lisp/textmodes/ispell.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index bc74401c21d..75590e711f5 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el | |||
| @@ -2132,7 +2132,7 @@ You can bind this to the key C-c i in GNUS or mail by adding to | |||
| 2132 | (forward-line 1)) | 2132 | (forward-line 1)) |
| 2133 | (setq case-fold-search nil) | 2133 | (setq case-fold-search nil) |
| 2134 | ;; Skip mail header, particularly for non-english languages. | 2134 | ;; Skip mail header, particularly for non-english languages. |
| 2135 | (if (looking-at mail-header-separator) | 2135 | (if (looking-at (concat (regexp-quote mail-header-separator) "$")) |
| 2136 | (forward-line 1)) | 2136 | (forward-line 1)) |
| 2137 | (while (< (point) limit) | 2137 | (while (< (point) limit) |
| 2138 | ;; Skip across text cited from other messages. | 2138 | ;; Skip across text cited from other messages. |