Fix RT#65907: missing build require: Test::Exception
[catagits/Catalyst-Devel.git] / t / get_sharedir_file.t
index f2a68ad..221e939 100644 (file)
@@ -1,20 +1,20 @@
 use strict;
 use warnings;
 
-use Test::More;
-use Test::Exception;
+use Test::More 0.88;
+use Test::Fatal;
 
 use Catalyst::Helper;
 
 my $i = bless {}, 'Catalyst::Helper';
 
-throws_ok {
+like exception {
     $i->get_sharedir_file(qw/does not exist and hopefully never will or we are
         totally screwed.txt/);
-} qr/Cannot find/, 'Exception for file not found from ->get_sharedir_file';
+}, qr/Cannot find/, 'Exception for file not found from ->get_sharedir_file';
 
-lives_ok {
+is exception {
     ok($i->get_sharedir_file('Makefile.PL.tt'), 'has contents');
-} 'Can get_sharedir_file';
+}, undef, 'Can get_sharedir_file';
 
 done_testing;