# HG changeset patch # User Richard M. Stallman # Date 717790512 0 # Node ID 1e1a54ebb29bf1771da065134afccb5b67cdc641 # Parent bf6b4bc3ccc04741485cc6e28024256c560e2e47 (mail-unsent-separator): Add another alternative. diff -r bf6b4bc3ccc0 -r 1e1a54ebb29b lisp/mail/rmail.el --- a/lisp/mail/rmail.el Tue Sep 29 17:43:45 1992 +0000 +++ b/lisp/mail/rmail.el Tue Sep 29 18:15:12 1992 +0000 @@ -1593,7 +1593,8 @@ (sendmail-send-it))) (kill-buffer tembuf)))) -(defvar mail-unsent-separator "^ ----- Unsent message follows -----$") +(defvar mail-unsent-separator + "^ *----- Unsent message follows ----- *$\\|^ *--- Returned message --- *$") (defun rmail-retry-failure () "Edit a mail message which is based on the contents of the current message.