aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1992-09-29 18:15:12 +0000
committerRichard M. Stallman1992-09-29 18:15:12 +0000
commit72e609d0db47631ae8d140c6da099bbe8cf36c96 (patch)
tree38c7c4db0385f12dc10d9f29f16092c662a3b289
parentf6c7b4e77c161bfc0adc6eb1af68324c9dceb5c9 (diff)
downloademacs-72e609d0db47631ae8d140c6da099bbe8cf36c96.tar.gz
emacs-72e609d0db47631ae8d140c6da099bbe8cf36c96.zip
(mail-unsent-separator): Add another alternative.
-rw-r--r--lisp/mail/rmail.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index d8bca27fd1f..5464eb3852f 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -1593,7 +1593,8 @@ typically for purposes of moderating a list."
1593 (sendmail-send-it))) 1593 (sendmail-send-it)))
1594 (kill-buffer tembuf)))) 1594 (kill-buffer tembuf))))
1595 1595
1596(defvar mail-unsent-separator "^ ----- Unsent message follows -----$") 1596(defvar mail-unsent-separator
1597 "^ *----- Unsent message follows ----- *$\\|^ *--- Returned message --- *$")
1597 1598
1598(defun rmail-retry-failure () 1599(defun rmail-retry-failure ()
1599 "Edit a mail message which is based on the contents of the current message. 1600 "Edit a mail message which is based on the contents of the current message.