From: Chong Yidong <cyd@stupidchicken.com>
Date: Tue, 27 Jan 2009 22:38:58 +0000 (+0000)
Subject: (unrmail): Record labels in X-RMAIL-* fields, which are recognized by
X-Git-Tag: emacs-pretest-23.0.90~133
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=77f33383720687b66524fde1280fbe7324b921d1;p=emacs.git

(unrmail): Record labels in X-RMAIL-* fields, which are recognized by
the new Rmail, instead of X-BABYL-V6-*.
---

diff --git a/lisp/mail/unrmail.el b/lisp/mail/unrmail.el
index 619e7e2b1c3..a6ec4bffc4d 100644
--- a/lisp/mail/unrmail.el
+++ b/lisp/mail/unrmail.el
@@ -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