changeset 1372:e839dc00fc2e

(mail-unsent-separator): Handle "Message text follows".
author Richard M. Stallman <rms@gnu.org>
date Fri, 09 Oct 1992 05:38:23 +0000
parents d8be1fdf53aa
children 7fc9bbcae71b
files lisp/mail/rmail.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/rmail.el	Fri Oct 09 05:29:15 1992 +0000
+++ b/lisp/mail/rmail.el	Fri Oct 09 05:38:23 1992 +0000
@@ -1602,7 +1602,8 @@
 (defvar mail-unsent-separator
   (concat "^ *---+ +Unsent message follows +---+ *$\\|"
 	  "^ *---+ +Returned message +---+ *$\\|"
-	  "^ *---+ +Original message +---+ *$"))
+	  "^ *---+ +Original message +---+ *$\\|"
+	  "^|? *---+ +Message text follows: +---+ *|?$"))
 
 (defun rmail-retry-failure ()
   "Edit a mail message which is based on the contents of the current message.