changeset 101412:c1fb3b6fe79a

(rmail-next-labeled-message): Correctly handle return value of rmail-get-labels.
author Chong Yidong <cyd@stupidchicken.com>
date Fri, 23 Jan 2009 19:02:31 +0000
parents d59cc7925a91
children 7030664ae12c
files lisp/mail/rmailkwd.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/rmailkwd.el	Fri Jan 23 19:02:24 2009 +0000
+++ b/lisp/mail/rmailkwd.el	Fri Jan 23 19:02:31 2009 +0000
@@ -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))