From 5ab43401cc255bc6ce74ed1643abc9b5cc9b3979 Mon Sep 17 00:00:00 2001 From: alec Date: Sun, 13 Feb 2011 18:04:12 +0000 Subject: - Fix escaping of backslash character in quoted strings (#1487780) git-svn-id: https://svn.roundcube.net/trunk@4536 208e9e7b-5314-0410-a742-e7e81cd9613c --- plugins/managesieve/tests/parser.phpt | 15 +++++++++++++-- 1 file changed, 13 insertions(+), 2 deletions(-) (limited to 'plugins/managesieve/tests/parser.phpt') diff --git a/plugins/managesieve/tests/parser.phpt b/plugins/managesieve/tests/parser.phpt index 519f8026b..d70353459 100644 --- a/plugins/managesieve/tests/parser.phpt +++ b/plugins/managesieve/tests/parser.phpt @@ -6,7 +6,7 @@ Main test of script parser 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"]; +} -- cgit v1.2.3