* Add a unit test for globlist_match().

master
joey 2006-05-02 07:03:52 +00:00
parent 3b0fce93e4
commit f9ce7a571d
3 changed files with 19 additions and 1 deletions

3
debian/changelog vendored
View File

@ -26,8 +26,9 @@ ikiwiki (1.1) UNRELEASED; urgency=low
* Removed backlinks page, which it turns out nothing used.
* Split off an IkiWiki.pm out of ikiwiki and have all the other modules use
it, this will allow for adding a unit test suite.
* Add a unit test for globlist_match().
-- Joey Hess <joeyh@debian.org> Tue, 2 May 2006 02:51:06 -0400
-- Joey Hess <joeyh@debian.org> Tue, 2 May 2006 03:03:21 -0400
ikiwiki (1.0) unstable; urgency=low

1
debian/rules vendored
View File

@ -5,6 +5,7 @@ build-stamp:
dh_testdir
perl Makefile.PL
$(MAKE)
$(MAKE) test
touch build-stamp
clean:

16
t/globlist_match.t 100755
View File

@ -0,0 +1,16 @@
#!/usr/bin/perl
use warnings;
use strict;
use Test::More tests => 11;
BEGIN { use_ok("IkiWiki"); }
ok(IkiWiki::globlist_match("foo", "*"));
ok(IkiWiki::globlist_match("foo", "f?? !foz"));
ok(! IkiWiki::globlist_match("foo", "f?? !foo"));
ok(! IkiWiki::globlist_match("foo", "* !foo"));
ok(! IkiWiki::globlist_match("foo", "foo !foo"));
ok(IkiWiki::globlist_match("page", "?ag?"));
ok(! IkiWiki::globlist_match("page", "?a?g?"));
ok(! IkiWiki::globlist_match("foo.png", "* !*.*"));
ok(IkiWiki::globlist_match("foo.png", "*.*"));
ok(! IkiWiki::globlist_match("foo", "*.*"));