[Catalyst-commits] r11381 -
Catalyst-Devel/1.00/branches/helper_refactor/t
zts at dev.catalyst.perl.org
zts at dev.catalyst.perl.org
Thu Sep 17 22:20:52 GMT 2009
Author: zts
Date: 2009-09-17 22:20:48 +0000 (Thu, 17 Sep 2009)
New Revision: 11381
Modified:
Catalyst-Devel/1.00/branches/helper_refactor/t/get_sharedir_file.t
Log:
Fixed get_sharedir_file.t checking for the wrong exception text.
Modified: Catalyst-Devel/1.00/branches/helper_refactor/t/get_sharedir_file.t
===================================================================
--- Catalyst-Devel/1.00/branches/helper_refactor/t/get_sharedir_file.t 2009-09-17 22:10:46 UTC (rev 11380)
+++ Catalyst-Devel/1.00/branches/helper_refactor/t/get_sharedir_file.t 2009-09-17 22:20:48 UTC (rev 11381)
@@ -12,7 +12,7 @@
throws_ok {
$i->get_sharedir_file(qw/does not exist and hopefully never will or we are
totally screwed.txt/);
-} qr/No such/, 'Exception for file not found from ->get_sharedir_file';
+} qr/Cannot find/, 'Exception for file not found from ->get_sharedir_file';
lives_ok {
ok($i->get_sharedir_file('Makefile.PL.tt'), 'has contents');
More information about the Catalyst-commits
mailing list