Imported Upstream version 0.6+dfsg

[roundcube.git] / plugins / managesieve / tests / parser.phpt

diff --git a/plugins/managesieve/tests/parser.phpt b/plugins/managesieve/tests/parser.phpt
index a3b820d45422b5d0161d5957646545b8224fec43..d703534599fef9e1fa32eabdaa7da09c7b9f9e02 100644 (file)
--- a/plugins/managesieve/tests/parser.phpt
+++ b/plugins/managesieve/tests/parser.phpt
@@ -3,10 +3,10 @@ Main test of script parser
 --SKIPIF--
 --FILE--
 <?php
-include('../lib/rcube_sieve.php');
+include '../lib/rcube_sieve_script.php';
 
 $txt = '
-require ["fileinto","vacation","reject","relational","comparator-i;ascii-numeric"];
+require ["fileinto","vacation","reject","relational","comparator-i;ascii-numeric","imapflags"];
 # rule:[spam]
 if anyof (header :contains "X-DSPAM-Result" "Spam")
 {
@@ -49,6 +49,11 @@ if size :over 5000K {
 # rule:[redirect]
 if header :value "ge" :comparator "i;ascii-numeric"
     ["X-Spam-score"] ["14"] {redirect "test@test.tld";}
+# rule:[imapflags]
+if header :matches "Subject" "^Test$" {
+    setflag "\\\\Seen";
+    addflag ["\\\\Answered","\\\\Deleted"];
+}
 ';
 
 $s = new rcube_sieve_script($txt);
@@ -56,7 +61,7 @@ echo $s->as_text();
 
 ?>
 --EXPECT--
-require ["fileinto","vacation","reject","relational","comparator-i;ascii-numeric"];
+require ["fileinto","vacation","reject","relational","comparator-i;ascii-numeric","imapflags"];
 # rule:[spam]
 if header :contains "X-DSPAM-Result" "Spam"
 {
@@ -101,3 +106,9 @@ if header :value "ge" :comparator "i;ascii-numeric" "X-Spam-score" "14"
 {
        redirect "test@test.tld";
 }
+# rule:[imapflags]
+if header :matches "Subject" "^Test$"
+{
+       setflag "\\Seen";
+       addflag ["\\Answered","\\Deleted"];
+}