summaryrefslogtreecommitdiffstats
path: root/t/06-addsub.t
diff options
context:
space:
mode:
Diffstat (limited to 't/06-addsub.t')
-rw-r--r--t/06-addsub.t6
1 files changed, 3 insertions, 3 deletions
diff --git a/t/06-addsub.t b/t/06-addsub.t
index 3c0dfc8..e8445f7 100644
--- a/t/06-addsub.t
+++ b/t/06-addsub.t
@@ -2,7 +2,7 @@ use strict;
use warnings;
use Test::More;
-use Test::Exception;
+use Test::Fatal;
BEGIN { $^P |= 0x210 } # PERLDBf_SUBLINE
@@ -15,9 +15,9 @@ my $foo_stash = Package::Stash->new('Foo');
ok(!defined($Foo::{funk}), '... the &funk slot has not been created yet');
-lives_ok {
+ok(!exception {
$foo_stash->add_package_symbol('&funk' => sub { "Foo::funk", __LINE__ });
-} '... created &Foo::funk successfully';
+}, '... created &Foo::funk successfully');
ok(defined($Foo::{funk}), '... the &funk slot was created successfully');