[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp/mail rmailsum.el
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] emacs/lisp/mail rmailsum.el |
Date: |
Tue, 03 Feb 2009 04:07:55 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Glenn Morris <gm> 09/02/03 04:07:55
Modified files:
lisp/mail : rmailsum.el
Log message:
(rmail-get-summary-labels): Treat empty labels as null.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mail/rmailsum.el?cvsroot=emacs&r1=1.164&r2=1.165
Patches:
Index: rmailsum.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/mail/rmailsum.el,v
retrieving revision 1.164
retrieving revision 1.165
diff -u -b -r1.164 -r1.165
--- rmailsum.el 31 Jan 2009 03:15:38 -0000 1.164
+++ rmailsum.el 3 Feb 2009 04:07:55 -0000 1.165
@@ -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.
- [Emacs-diffs] emacs/lisp/mail rmailsum.el,
Glenn Morris <=