diff options
| author | Joey Hess <joey@kodama.kitenet.net> | 2008-11-11 17:52:32 -0500 |
|---|---|---|
| committer | Joey Hess <joey@kodama.kitenet.net> | 2008-11-11 17:52:32 -0500 |
| commit | 2a56ec664402e21625e9251dcbb3b53490e7ed0d (patch) | |
| tree | a3b8ca059cd5b671721b071f4d30786a389d7196 /t/pagespec_match.t | |
| parent | f6db9205369d1197bbd05f3e07ed79393b5fe220 (diff) | |
| parent | d1b22b252481134815b1d02d564b6b9622fe7b4b (diff) | |
Merge branch 'master' into po
Diffstat (limited to 't/pagespec_match.t')
| -rwxr-xr-x | t/pagespec_match.t | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/t/pagespec_match.t b/t/pagespec_match.t index c61d16122..7c0ac235b 100755 --- a/t/pagespec_match.t +++ b/t/pagespec_match.t @@ -1,7 +1,7 @@ #!/usr/bin/perl use warnings; use strict; -use Test::More tests => 56; +use Test::More tests => 58; BEGIN { use_ok("IkiWiki"); } @@ -40,6 +40,7 @@ $links{"bugs/bar"}=[qw{done}]; $links{"done"}=[]; $links{"examples/softwaresite/bugs/fails_to_frobnicate"}=[qw{done}]; $links{"examples/softwaresite/bugs/done"}=[]; +$links{"ook"}=[qw{/blog/tags/foo}]; ok(pagespec_match("foo", "link(bar)"), "link"); ok(pagespec_match("foo", "link(ba?)"), "glob link"); @@ -55,6 +56,8 @@ ok(pagespec_match("bar", "backlink(foo)"), "backlink"); ok(! pagespec_match("quux", "backlink(foo)"), "failed backlink"); ok(! pagespec_match("bar", ""), "empty pagespec should match nothing"); ok(! pagespec_match("bar", " "), "blank pagespec should match nothing"); +ok(pagespec_match("ook", "link(blog/tags/foo)"), "link internal absolute success"); +ok(pagespec_match("ook", "link(/blog/tags/foo)"), "link explicit absolute success"); $IkiWiki::pagectime{foo}=1154532692; # Wed Aug 2 11:26 EDT 2006 $IkiWiki::pagectime{bar}=1154532695; # after |