[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp/mail rmailkwd.el
From: |
Chong Yidong |
Subject: |
[Emacs-diffs] emacs/lisp/mail rmailkwd.el |
Date: |
Fri, 23 Jan 2009 19:02:31 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Chong Yidong <cyd> 09/01/23 19:02:31
Modified files:
lisp/mail : rmailkwd.el
Log message:
(rmail-next-labeled-message): Correctly handle return value of
rmail-get-labels.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mail/rmailkwd.el?cvsroot=emacs&r1=1.29&r2=1.30
Patches:
Index: rmailkwd.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/mail/rmailkwd.el,v
retrieving revision 1.29
retrieving revision 1.30
diff -u -b -r1.29 -r1.30
--- rmailkwd.el 23 Jan 2009 04:06:29 -0000 1.29
+++ rmailkwd.el 23 Jan 2009 19:02:31 -0000 1.30
@@ -142,9 +142,9 @@
(rmail-maybe-set-message-counters)
(let ((lastwin rmail-current-message)
(current rmail-current-message)
- (regexp (concat ", ?\\("
+ (regexp (concat " ?\\("
(mail-comma-list-regexp labels)
- "\\),")))
+ "\\)")))
(while (and (> n 0) (< current rmail-total-messages))
(setq current (1+ current))
(if (string-match regexp (rmail-get-labels current))
- [Emacs-diffs] emacs/lisp/mail rmailkwd.el,
Chong Yidong <=