| commit | author | age | ||
| 48e9c1 | 1 | --TEST-- |
| T | 2 | Test of Sieve variables extension |
| 3 | --SKIPIF-- | |
| 4 | --FILE-- | |
| 5 | <?php | |
| 6 | include '../lib/rcube_sieve_script.php'; | |
| 7 | ||
| 8 | $txt = ' | |
| 9 | require ["variables"]; | |
| 10 | set "honorific" "Mr"; | |
| 11 | set "vacation" text: | |
| 12 | Dear ${HONORIFIC} ${last_name}, | |
| 13 | I am out, please leave a message after the meep. | |
| 14 | . | |
| 15 | ; | |
| 16 | set :length "b" "${a}"; | |
| 17 | set :lower "b" "${a}"; | |
| 18 | set :upperfirst "b" "${a}"; | |
| 19 | set :upperfirst :lower "b" "${a}"; | |
| 20 | set :quotewildcard "b" "Rock*"; | |
| 21 | '; | |
| 22 | ||
| 23 | $s = new rcube_sieve_script($txt, array(), array('variables')); | |
| 24 | echo $s->as_text(); | |
| 25 | ||
| 26 | ?> | |
| 27 | --EXPECT-- | |
| 28 | require ["variables"]; | |
| 29 | set "honorific" "Mr"; | |
| 30 | set "vacation" text: | |
| 31 | Dear ${HONORIFIC} ${last_name}, | |
| 32 | I am out, please leave a message after the meep. | |
| 33 | . | |
| 34 | ; | |
| 35 | set :length "b" "${a}"; | |
| 36 | set :lower "b" "${a}"; | |
| 37 | set :upperfirst "b" "${a}"; | |
| 38 | set :upperfirst :lower "b" "${a}"; | |
| 39 | set :quotewildcard "b" "Rock*"; | |
