X-Git-Url: https://sipb.mit.edu/gitweb.cgi/ikiwiki.git/blobdiff_plain/6bb7f948563fd5305aa95fc71bd2cb7f5c85bb25..96d52b82edffae197ae182f7073d4b7a8d88880b:/t/pagespec_match.t diff --git a/t/pagespec_match.t b/t/pagespec_match.t index ee255b471..c61d16122 100755 --- a/t/pagespec_match.t +++ b/t/pagespec_match.t @@ -1,11 +1,13 @@ #!/usr/bin/perl use warnings; use strict; -use Test::More tests => 54; +use Test::More tests => 56; BEGIN { use_ok("IkiWiki"); } ok(pagespec_match("foo", "*")); +ok(!pagespec_match("foo", "")); +ok(pagespec_match("foo", "!bar")); ok(pagespec_match("page", "?ag?")); ok(! pagespec_match("page", "?a?g?")); ok(pagespec_match("foo.png", "*.*")); @@ -71,7 +73,7 @@ ok(! pagespec_match("foo", "no_such_function(foo)"), "foo"); my $ret=pagespec_match("foo", "(invalid"); ok(! $ret, "syntax error"); -ok($ret eq "syntax error", "error message"); +ok($ret =~ /syntax error/, "error message"); # old style globlists ok(pagespec_match("foo", "foo bar"), "simple list");