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++;