t/img.t: Give better diagnostics if we can't load an image

1 files changed, 1 insertions, 1 deletions

diff --git a/t/img.t b/t/img.t
index 228f09a0e..20c960500 100755
--- a/t/img.t
+++ b/t/img.t
@@ -107,7 +107,7 @@ sub size($) {
 	my $filename = shift;
 	my $im = Image::Magick->new();
 	my $r = $im->Read(":$filename");
-	return "no image" if $r;
+	return "no image: $r" if $r;
 	my $w = $im->Get("width");
 	my $h = $im->Get("height");
 	return "${w}x${h}";