[Emacs-diffs] emacs/lisp/mail unrmail.el

[Chong Yidong]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Chong Yidong <cyd>      09/01/27 22:38:58

Modified files:
        lisp/mail      : unrmail.el 

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

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mail/unrmail.el?cvsroot=emacs&r1=1.27&r2=1.28

Patches:
Index: unrmail.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/mail/unrmail.el,v
retrieving revision 1.27
retrieving revision 1.28
diff -u -b -r1.27 -r1.28
--- unrmail.el  27 Jan 2009 03:41:25 -0000      1.27
+++ unrmail.el  27 Jan 2009 22:38:58 -0000      1.28
@@ -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