# HG changeset patch # User Chong Yidong # Date 1233095938 0 # Node ID 01abffb7f38cc5f5864675bae65e198e449ed4ba # Parent b7197e72fe7ab90670c03c5746761658e6a0e8ed (unrmail): Record labels in X-RMAIL-* fields, which are recognized by the new Rmail, instead of X-BABYL-V6-*. diff -r b7197e72fe7a -r 01abffb7f38c lisp/mail/unrmail.el --- a/lisp/mail/unrmail.el Tue Jan 27 22:38:47 2009 +0000 +++ b/lisp/mail/unrmail.el Tue Jan 27 22:38:58 2009 +0000 @@ -203,9 +203,9 @@ ;; Insert the `From ' line. (insert mail-from "\n") ;; Record the keywords and attributes in our special way. - (insert "X-BABYL-V6-ATTRIBUTES: " (apply 'string attrs) "\n") + (insert "X-RMAIL-ATTRIBUTES: " (apply 'string attrs) "\n") (when keywords - (insert "X-BABYL-V6-KEYWORDS: " keywords "\n")) + (insert "X-RMAIL-KEYWORDS: " keywords "\n")) (goto-char (point-min)) ;; ``Quote'' "\nFrom " as "\n>From " ;; (note that this isn't really quoting, as there is no requirement