From: Tony Cook <tony@develop-help.com>
Date: Sat, 26 May 2012 02:33:49 +0000 (+1000)
Subject: adjust the test error messages to match the new module load errors
X-Git-Tag: v0.91~5
X-Git-Url: http://git.imager.perl.org/imager.git/commitdiff_plain/07b0697bc1e5a0bddc29f34fbf32a53040b995a7

adjust the test error messages to match the new module load errors
---

diff --git a/t/t1000files.t b/t/t1000files.t
index 80834102..0557f37e 100644
--- a/t/t1000files.t
+++ b/t/t1000files.t
@@ -92,7 +92,7 @@ is_deeply([ Imager->get_file_limits() ], [ 0, 0, 0 ],
     my $data = "abc";
     ok(!Imager->new(data => $data, filetype => "bad"),
        "try to read an bad (other load failure) file type");
-   like(Imager->errstr, qr(^format 'bad' not supported - formats .* available for reading - This module fails to load$),
+   like(Imager->errstr, qr(^format 'bad' not supported - formats .* available for reading - This module fails to load loading Imager/File/BAD.pm$),
 	"check error message");
   }
   {
@@ -100,7 +100,7 @@ is_deeply([ Imager->get_file_limits() ], [ 0, 0, 0 ],
     my $im = Imager->new(xsize => 10, ysize => 10);
     ok(!$im->write(data => \$data, type => "bad"),
        "try to write an bad file type");
-   like($im->errstr, qr(^format 'bad' not supported - formats .* available for writing - This module fails to load$),
+   like($im->errstr, qr(^format 'bad' not supported - formats .* available for writing - This module fails to load loading Imager/File/BAD.pm$),
 	"check error message");
   }
 }