You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
perl-Image-Info/Image-Info-1.16-string.t.patch

15 lines
456 B

diff -ruN Image-Info-1.16/t/string.t Image-Info-1.16-patched/t/string.t
--- Image-Info-1.16/t/string.t 2003-10-06 18:13:30.000000000 +0100
+++ Image-Info-1.16-patched/t/string.t 2004-06-08 22:17:41.000000000 +0100
@@ -30,6 +30,10 @@
my $img = cat($file);
my $h2 = image_info(\$img);
+ if (my $err = $h2->{error}) {
+ print "# - $err\n";
+ }
+
print "not " unless hash_equal($h1, $h2);
print "ok $testno\n";
$testno++;