# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1233340252 0
# Node ID c39779cefaea8a5615fe11850e2ae3cc4e75cf83
# Parent  f690c4fa34f4e29da3eb751c8a408953ed6d0c0f
(unrmail): Fix conversion of BABYL attributes into Rmail-mbox attributes.

diff -r f690c4fa34f4 -r c39779cefaea lisp/mail/unrmail.el
--- 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.