aboutsummaryrefslogtreecommitdiff
path: root/t/globlist_match.t
diff options
context:
space:
mode:
authorjoey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071>2006-05-02 15:22:49 +0000
committerjoey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071>2006-05-02 15:22:49 +0000
commit47cec07e4441a06bb741910a329215d4d6ad0a86 (patch)
treeab24862ee6feb7f814d81eded753e200a825aefe /t/globlist_match.t
parentf9ce7a571ddbe124bb93bcfd3388e2cd4d77ec06 (diff)
downloadikiwiki-47cec07e4441a06bb741910a329215d4d6ad0a86.tar
ikiwiki-47cec07e4441a06bb741910a329215d4d6ad0a86.tar.gz
ah, the joys of test-based development..
think I have smart glob list matching working ok
Diffstat (limited to 't/globlist_match.t')
-rwxr-xr-xt/globlist_match.t4
1 files changed, 3 insertions, 1 deletions
diff --git a/t/globlist_match.t b/t/globlist_match.t
index 3d196e09c..b60d83a2a 100755
--- a/t/globlist_match.t
+++ b/t/globlist_match.t
@@ -1,9 +1,11 @@
#!/usr/bin/perl
use warnings;
use strict;
-use Test::More tests => 11;
+use Test::More tests => 13;
BEGIN { use_ok("IkiWiki"); }
+ok(IkiWiki::globlist_match("foo", "foo bar"), "simple list");
+ok(IkiWiki::globlist_match("bar", "foo bar"), "simple list 2");
ok(IkiWiki::globlist_match("foo", "*"));
ok(IkiWiki::globlist_match("foo", "f?? !foz"));
ok(! IkiWiki::globlist_match("foo", "f?? !foo"));