(mail-unsent-separator): Add `-- begin message --'.

487fcdc0 · Richard M. Stallman · 22faf171 · 487fcdc0
Commit 487fcdc0 authored Jan 09, 1993 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 0 deletions

lisp/mail/rmail.el lisp/mail/rmail.el +1 -0

No files found.
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -1605,6 +1605,7 @@ typically for purposes of moderating a list."
  (concat "^ *---+ +Unsent message follows +---+ *$\\|"
 	  "^ *---+ +Returned message +---+ *$\\|"
 	  "^ *---+ +Original message +---+ *$\\|"
+	  "^ *--+ +begin message +--+ *$\\|"
 	  "^|? *---+ +Message text follows: +---+ *|?$"))

 (defun rmail-retry-failure ()