From: yoichi <yoichi>
Date: Mon, 19 Jun 2006 13:50:17 +0000 (+0000)
Subject: * wl-folder.el (wl-folder-complete-filter-condition): Remove !
X-Git-Tag: wl-2_15_4~25
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=4ac381c94e0dea68f64ceccfe34cb8cf41926db8;p=elisp%2Fwanderlust.git

* wl-folder.el (wl-folder-complete-filter-condition): Remove !
from regexp.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 6aa1ffd..de3ee0e 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,5 +1,8 @@
 2006-06-19  Yoichi NAKAYAMA  <yoichi@geiin.org>
 
+	* wl-folder.el (wl-folder-complete-filter-condition): Remove !
+	from regexp.
+
 	* wl-util.el (wl-search-condition-fields): Remove "AND","OR".
 	(wl-read-search-condition-internal): Append them.
 
diff --git a/wl/wl-folder.el b/wl/wl-folder.el
index b4d3fc8..a2f90f6 100644
--- a/wl/wl-folder.el
+++ b/wl/wl-folder.el
@@ -3028,7 +3028,7 @@ Call `wl-summary-write-current-folder' with current folder name."
 
 (defun wl-folder-complete-filter-condition (string predicate flag)
   (cond
-   ((string-match "^\\(.*|\\|.*&\\|.*!\\|.*(\\)\\([^:]*\\)$" string)
+   ((string-match "^\\(.*|\\|.*&\\|.*(\\)\\([^:]*\\)$" string)
     (let* ((str1 (match-string 1 string))
 	   (str2 (match-string 2 string))
 	   (str2-comp