mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-04 20:27:45 +00:00
Code Issues Releases Activity

(unrmail): Record labels in X-RMAIL-* fields, which are recognized by

Browse Source 
the new Rmail, instead of X-BABYL-V6-*.
This commit is contained in:
Chong Yidong 2009-01-27 22:38:58 +00:00
parent 0112aa1bfd
commit 77f3338372
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/mail/unrmail.el
View File

@ -203,9 +203,9 @@ For example, invoke `emacs -batch -f batch-unrmail RMAIL'."
;; 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