changeset 101767:4958df99b14c

(rmail-get-summary-labels): Treat empty labels as null.
author Glenn Morris <rgm@gnu.org>
date Tue, 03 Feb 2009 04:07:55 +0000
parents 4c8d51496578
children 740893b50e9e
files lisp/mail/rmailsum.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/rmailsum.el	Tue Feb 03 04:07:25 2009 +0000
+++ b/lisp/mail/rmailsum.el	Tue Feb 03 04:07:55 2009 +0000
@@ -426,7 +426,9 @@
 already be narrowed to the message headers for the message being
 processed."
   (let ((labels (mail-fetch-field rmail-keyword-header)))
-    (if labels (format "{ %s } " labels))))
+    (and labels
+	 (not (string-equal labels ""))
+	 (format "{ %s } " labels))))
 
 (defun rmail-create-summary (msgnum deleted unseen lines)
   "Return the summary line for message MSGNUM.