From 2074c0b628cfd2cebbbcf7db36cd5ece9f00accf Mon Sep 17 00:00:00 2001
From: Milan Crha <mcrha@redhat.com>
Date: Mon, 3 Dec 2012 13:28:17 +0100
Subject: Bug #529743 - Add "Any header" filter and search folder condition

---
 mail/vfoldertypes.xml | 79 +++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 79 insertions(+)

(limited to 'mail/vfoldertypes.xml')

diff --git a/mail/vfoldertypes.xml b/mail/vfoldertypes.xml
index 9195271c9c..d8c6ea5931 100644
--- a/mail/vfoldertypes.xml
+++ b/mail/vfoldertypes.xml
@@ -550,6 +550,85 @@
    <input type="string" name="word"/>
  </part>
 
+ <part name="anyheader">
+   <title>Any header</title>
+   <input type="optionlist" name="header-type">
+    <option value="contains">
+     <title>contains</title>
+     <code>
+	(match-all (header-contains "" ${word}))
+     </code>
+    </option>
+    <option value="not contains">
+     <title>does not contain</title>
+     <code>
+	(match-all (not (header-contains "" ${word})))
+     </code>
+    </option>
+    <option value="has-words">
+     <title>has words</title>
+     <code>
+	(match-all (header-has-words "" ${word}))
+     </code>
+    </option>
+    <option value="not has-words">
+     <title>does not have words</title>
+     <code>
+	(match-all (not (header-has-words "" ${word})))
+     </code>
+    </option>
+    <option value="is">
+     <title>is</title>
+     <code>
+	(match-all (header-matches "" ${word}))
+     </code>
+    </option>
+    <option value="is not">
+     <title>is not</title>
+     <code>
+	(match-all (not (header-matches "" ${word})))
+     </code>
+    </option>
+    <option value="starts with">
+     <title>starts with</title>
+     <code>
+	(match-all (header-starts-with "" ${word}))
+     </code>
+    </option>
+    <option value="not starts with">
+     <title>does not start with</title>
+     <code>
+	(match-all (not (header-starts-with "" ${word})))
+     </code>
+    </option>
+    <option value="ends with">
+     <title>ends with</title>
+     <code>
+	(match-all (header-ends-with "" ${word}))
+     </code>
+    </option>
+    <option value="not ends with">
+     <title>does not end with</title>
+     <code>
+	(match-all (not (header-ends-with "" ${word})))
+     </code>
+    </option>
+    <option value="matches soundex">
+     <title>sounds like</title>
+     <code>
+        (match-all (header-soundex "" ${word}))
+     </code>
+    </option>
+    <option value="not match soundex">
+     <title>does not sound like</title>
+     <code>
+        (match-all (not (header-soundex "" ${word})))
+     </code>
+    </option>
+   </input>
+   <input type="string" name="word"/>
+ </part>
+
  <part name="body">
    <title>Message Body</title>
    <input type="optionlist" name="body-type">
-- 
cgit v1.2.3