urosm
/
ikiwiki
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

make img unittest easier to debug

master
chrysn 2014-07-15 14:03:00 +02:00
parent fa2a4d0db4
commit a0a26d24f9
1 changed files with 12 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
t/img.t
View File

@ -43,7 +43,8 @@ ok(! system($command));
sub size($) {
my $filename = shift;
my $im = Image::Magick->new();
$im->Read($filename);
my $r = $im->Read($filename);
return "no image" if $r;
my $w = $im->Get("width");
my $h = $im->Get("height");
return "${w}x${h}";
@ -58,17 +59,19 @@ is(size("$outpath/16x-p1-twopages.png"), "16x2");
# now let's remove them again
writefile("imgconversions.mdwn", "t/tmp/in", "nothing to see here");
if (1) { # for easier testing
writefile("imgconversions.mdwn", "t/tmp/in", "nothing to see here");
ok(! system("$command --refresh"));
ok(! system("$command --refresh"));
ok(! -e "$outpath/10x-simple.png");
ok(! -e "$outpath/10x-simple-svg.png");
ok(! -e "$outpath/10x-simple-pdf.png");
ok(! -e "$outpath/10x-p1-simple-pdf.png");
ok(! -e "$outpath/10x-simple.png");
ok(! -e "$outpath/10x-simple-svg.png");
ok(! -e "$outpath/10x-simple-pdf.png");
ok(! -e "$outpath/10x-p1-simple-pdf.png");
# cleanup
ok(! system("rm -rf t/tmp"));
# cleanup
ok(! system("rm -rf t/tmp"));
}
done_testing;
1;