* Add a unit test for globlist_match().
parent
3b0fce93e4
commit
f9ce7a571d
|
@ -26,8 +26,9 @@ ikiwiki (1.1) UNRELEASED; urgency=low
|
||||||
* Removed backlinks page, which it turns out nothing used.
|
* Removed backlinks page, which it turns out nothing used.
|
||||||
* Split off an IkiWiki.pm out of ikiwiki and have all the other modules use
|
* 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.
|
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
|
ikiwiki (1.0) unstable; urgency=low
|
||||||
|
|
||||||
|
|
|
@ -5,6 +5,7 @@ build-stamp:
|
||||||
dh_testdir
|
dh_testdir
|
||||||
perl Makefile.PL
|
perl Makefile.PL
|
||||||
$(MAKE)
|
$(MAKE)
|
||||||
|
$(MAKE) test
|
||||||
touch build-stamp
|
touch build-stamp
|
||||||
|
|
||||||
clean:
|
clean:
|
||||||
|
|
|
@ -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", "*.*"));
|
Loading…
Reference in New Issue