diff options
Diffstat (limited to 't')
-rwxr-xr-x | t/tag.t | 19 |
1 files changed, 12 insertions, 7 deletions
@@ -3,7 +3,7 @@ package IkiWiki; use warnings; use strict; -use Test::More tests => 21; +use Test::More tests => 22; BEGIN { use_ok("IkiWiki"); } BEGIN { use_ok("IkiWiki::Render"); } @@ -58,25 +58,30 @@ IkiWiki::Plugin::tag::preprocess_tag(page => "seven", numbers => undef, primes = is($autofiles{"tags/lucky.mdwn"}{plugin}, "tag"); is($autofiles{"tags/numbers.mdwn"}{plugin}, "tag"); is($autofiles{"tags/primes.mdwn"}{plugin}, "tag"); +is_deeply([sort keys %autofiles], [qw(tags/lucky.mdwn tags/numbers.mdwn tags/primes.mdwn)]); ok(!-e "t/tmp/tags/lucky.mdwn"); my (%pages, @del); IkiWiki::gen_autofile("tags/lucky.mdwn", \%pages, \@del); -is_deeply(\%pages, {"t/tmp/tags/lucky" => 1}) || diag explain \%pages; -is_deeply(\@del, []) || diag explain \@del; +is_deeply(\%pages, {"t/tmp/tags/lucky" => 1}); +is_deeply(\@del, []); ok(-s "t/tmp/tags/lucky.mdwn"); # generating an autofile that already exists does nothing %pages = @del = (); IkiWiki::gen_autofile("tags/numbers.mdwn", \%pages, \@del); -is_deeply(\%pages, {}) || diag explain \%pages; -is_deeply(\@del, []) || diag explain \@del; +is_deeply(\%pages, {}); +is_deeply(\@del, []); # generating an autofile that we just deleted does nothing %pages = (); @del = ('tags/primes.mdwn'); IkiWiki::gen_autofile("tags/primes.mdwn", \%pages, \@del); -is_deeply(\%pages, {}) || diag explain \%pages; -is_deeply(\@del, ['tags/primes.mdwn']) || diag explain \@del; +is_deeply(\%pages, {}); +is_deeply(\@del, ['tags/primes.mdwn']); + + +# cleanup +ok(! system("rm -rf t/tmp")); 1; |