summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1996-12-27 02:06:41 +0000
committerRichard M. Stallman <rms@gnu.org>1996-12-27 02:06:41 +0000
commit443a012b9594a27b8fd04847d63422fae0dc4390 (patch)
treeebc0629f2e77bd3563087d32e0d0c589b91cf3fb /lisp
parentf3816023217c7083faf94e3785322a7c9c27b036 (diff)
downloademacs-443a012b9594a27b8fd04847d63422fae0dc4390.tar.gz
(ispell-message-text-end): Handle `- ' before
the "cut here" or "start of..." line. Handle `Forward message' without `Start of'.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/textmodes/ispell.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index 79f81ad4df2..dd553fa90e7 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -2059,8 +2059,9 @@ warns you if the previous word is incorrectly spelled."
;; Matches reporter.el bug report
"^current state:\n==============\n"
;; Matches "----------------- cut here"
- ;; and "------- Start of forwarded message"
- "^[-=_]+\\s ?\\(cut here\\|Start of forwarded message\\)")
+ ;; and "------- Start of forwarded message",
+ ;; or either one with "- " in front.
+ "^\\(- \\)?[-=_]+\\s ?\\(cut here\\|\\(Start of \\)?forwarded message\\)")
"\\|")
"*End of text which will be checked in ispell-message.
If it is a string, limit at first occurrence of that regular expression.