diff options
author | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-05-16 02:53:40 +0000 |
---|---|---|
committer | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-05-16 02:53:40 +0000 |
commit | 89172b074ef8db7fbf9121ff13136c74ec102f29 (patch) | |
tree | 8f7c65bf94a06a233c753805dafa75d1aa5a517a /t | |
parent | 4a86427e85939157d906edc313326b00e64d0914 (diff) |
Some if series -> if elsif conversions
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1200 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 't')
-rw-r--r-- | t/10-form.t | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/t/10-form.t b/t/10-form.t index 68b5e264..6c170a80 100644 --- a/t/10-form.t +++ b/t/10-form.t @@ -411,3 +411,7 @@ is($form->sort_order($aryref, {name => 0, projectnumber => 3, startdate => 1}), $form = new Form; @r = trap{$form->print_button({'pear' => {'key' => 'P', 'value' => 'Pears'}}, 'pear')}; is($trap->stdout, "<button class=\"submit\" type=\"submit\" name=\"action\" value=\"pear\" accesskey=\"P\" title=\"Pears [Alt-P]\">Pears</button>\n", 'print_button'); + +## $form->like checks +$form = new Form; +is($form->like('hello world'), '%hello world%', 'like'); |