From 80cb4057f8c3f60e781ecbb9b1f8a66614e02dca Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Fri, 23 Jan 2009 19:02:31 +0000 Subject: [PATCH] (rmail-next-labeled-message): Correctly handle return value of rmail-get-labels. --- lisp/mail/rmailkwd.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/mail/rmailkwd.el b/lisp/mail/rmailkwd.el index 0cf8f1b3849..165b1c96a7d 100644 --- a/lisp/mail/rmailkwd.el +++ b/lisp/mail/rmailkwd.el @@ -142,9 +142,9 @@ With prefix argument N moves forward N messages with these labels." (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)) -- 2.39.2