Mercurial > emacs
changeset 8572:1dd6c880b6ea
(rmail-retry-failure, mail-unsent-separator): Doc fix.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 19 Aug 1994 22:50:56 +0000 |
| parents | ec740be1ce7b |
| children | a93b8c18e07a |
| files | lisp/mail/rmail.el |
| diffstat | 1 files changed, 5 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/rmail.el Fri Aug 19 08:00:34 1994 +0000 +++ b/lisp/mail/rmail.el Fri Aug 19 22:50:56 1994 +0000 @@ -2090,12 +2090,15 @@ "^ *---+ +Original message +---+ *$\\|" "^ *--+ +begin message +--+ *$\\|" "^ *---+ +Original message follows +---+ *$\\|" - "^|? *---+ +Message text follows: +---+ *|?$")) + "^|? *---+ +Message text follows: +---+ *|?$") + "A regexp that matches the separator before the text of a failed message.") (defun rmail-retry-failure () "Edit a mail message which is based on the contents of the current message. For a message rejected by the mail system, extract the interesting headers and -the body of the original message." +the body of the original message. +The variable `mail-unsent-separator' should match the string that +delimits the returned original message." (interactive) (require 'mail-utils) (let (to subj irp2 cc orig-message)