X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fget_sharedir_file.t;h=f2a68add070d4546a7460f15c5040b59ef5556d4;hb=53e0f67ff7d0877b2d64b4047992a10e17b584b9;hp=2ec7cabdd4fd7dd27561ac27fac1b1ba076063fd;hpb=163f1f1f7818c756f327d8b4c9c90d0d4e00832f;p=catagits%2FCatalyst-Devel.git diff --git a/t/get_sharedir_file.t b/t/get_sharedir_file.t index 2ec7cab..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.tt'), 'has contents'); + ok($i->get_sharedir_file('Makefile.PL.tt'), 'has contents'); } 'Can get_sharedir_file'; +done_testing;