From 75041656eea4a94229543be39a1cf89990a35517 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Tue, 4 Dec 2007 21:31:30 +0000
Subject: [PATCH] adding more debug statements to Storage/Image.t

---
 t/Storage/Image.t | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/t/Storage/Image.t b/t/Storage/Image.t
index 60601e46e..6bceb31ca 100644
--- a/t/Storage/Image.t
+++ b/t/Storage/Image.t
@@ -251,6 +251,7 @@ cmp_bag(
 foreach my $testImage (@testImages) {
     my $filename = $testImage->{ filename };
     is($sizeTest->adjustMaxImageSize($filename), 0, "$filename does not need to be resized");
+    diag sprintf("%s -> oldw size = %d x %d", $filename, $sizeTest->getSizeInPixels($filename));
     cmp_bag(
         [ $sizeTest->getSizeInPixels($filename)     ],
         [ @{ $testImage }{qw/origHeight origWidth/} ],
@@ -263,6 +264,7 @@ foreach my $testImage (@testImages) {
     my $filename = $testImage->{ filename };
     is($sizeTest->adjustMaxImageSize($filename), 1, "$filename needs to be resized");
     my @newSize = $sizeTest->getSizeInPixels($filename);
+    diag sprintf("%s -> new size = %d x %d", $filename, @newSize);
     cmp_bag(
         [ $sizeTest->getSizeInPixels($filename)   ],
         [ @{ $testImage }{qw/newHeight newWidth/} ],