From 4a1f30851d563ee9a07f3de6c2ebd4cca9bf4b6e Mon Sep 17 00:00:00 2001 From: hmurata Date: Fri, 18 Feb 2005 17:27:22 +0000 Subject: [PATCH] (wl-read-search-condition-internal): Fixed the last change. --- wl/ChangeLog | 5 +++++ wl/wl-util.el | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index e25a791..7be8382 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2005-02-18 Hiroya Murata + + * wl-util.el (wl-read-search-condition-internal): Fixed the last + change. + 2005-02-18 Yoichi NAKAYAMA * wl-util.el (wl-read-search-condition-internal): Protect diff --git a/wl/wl-util.el b/wl/wl-util.el index bfc84c3..04d180c 100644 --- a/wl/wl-util.el +++ b/wl/wl-util.el @@ -1091,8 +1091,8 @@ is enclosed by at least one regexp grouping construct." (mapcar (lambda (f) (list (capitalize (symbol-name f)))) (elmo-uniq-list (append - elmo-global-flags - '(unread answered forwarded digest any)) + '(unread answered forwarded digest any) + (copy-sequence elmo-global-flags)) #'delq))))) (unless (elmo-flag-valid-p value) (message "Invalid char in `%s'" value) -- 1.7.10.4