changeset 101685:c39779cefaea

(unrmail): Fix conversion of BABYL attributes into Rmail-mbox attributes.
author Eli Zaretskii <eliz@gnu.org>
date Fri, 30 Jan 2009 18:30:52 +0000
parents f690c4fa34f4
children 27f395149b31
files lisp/mail/unrmail.el
diffstat 1 files changed, 4 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/unrmail.el	Fri Jan 30 18:29:48 2009 +0000
+++ b/lisp/mail/unrmail.el	Fri Jan 30 18:30:52 2009 +0000
@@ -145,9 +145,10 @@
 		   (if (string-match ", deleted," label-line) ?D ?-)
 		   (if (string-match ", edited," label-line) ?E ?-)
 		   (if (string-match ", filed," label-line) ?F ?-)
-		   (if (string-match ", resent," label-line) ?R ?-)
-		   (if (string-match ", unseen," label-line) ?\  ?-)
-		   (if (string-match ", stored," label-line) ?S ?-)))
+		   (if (string-match ", retried," label-line) ?R ?-)
+		   (if (string-match ", forwarded," label-line) ?S ?-)
+		   (if (string-match ", unseen," label-line) ?U ?-)
+		   (if (string-match ", resent," label-line) ?r ?-)))
 
 	    ;; Delete the special Babyl lines at the start,
 	    ;; and the ***EOOH*** line, and the reformatted header if any.