X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fget_sharedir_file.t;h=f2a68add070d4546a7460f15c5040b59ef5556d4;hb=e62ab07578a0433bdd4be9dd55a5cd6221973a70;hp=56b9a0832558a3441d98a4921443e97d8ccebd2f;hpb=312ab89fa9c3f147a7418c9f0c5899d362d59330;p=catagits%2FCatalyst-Devel.git diff --git a/t/get_sharedir_file.t b/t/get_sharedir_file.t index 56b9a08..f2a68ad 100644 --- a/t/get_sharedir_file.t +++ b/t/get_sharedir_file.t @@ -1,20 +1,20 @@ use strict; use warnings; -use Test::MockObject::Extends; -use Test::More tests => 3; +use Test::More; use Test::Exception; use Catalyst::Helper; -my $i = Test::MockObject::Extends->new('Catalyst::Helper'); +my $i = bless {}, 'Catalyst::Helper'; 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'); } 'Can get_sharedir_file'; +done_testing;