diff options
| author | Richard M. Stallman <rms@gnu.org> | 1992-10-09 05:38:23 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1992-10-09 05:38:23 +0000 |
| commit | db32c193364516e630fa7e264a31d5048b81f4fa (patch) | |
| tree | 12bab79a4a5dc03ceb1e69570fcb758352d2a8f0 /lisp | |
| parent | 5792c834cd01deff490a2884ab6630ce8d9177fc (diff) | |
| download | emacs-db32c193364516e630fa7e264a31d5048b81f4fa.tar.gz | |
(mail-unsent-separator): Handle "Message text follows".
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mail/rmail.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index de626fb40cf..2c7e7fab6cc 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -1602,7 +1602,8 @@ typically for purposes of moderating a list." (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. |