summaryrefslogtreecommitdiffstats
path: root/t/03-io.t
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2010-11-12 11:48:30 -0600
committerJesse Luehrs <doy@tozt.net>2010-11-12 11:48:30 -0600
commit2033654760f55aa6b34262de791a32e98a33a046 (patch)
tree0cdb96ec731114fbb66728537b0309fac0607e1f /t/03-io.t
parent34805376fa48a707b1a7f52f3a282ee5cacd2cf9 (diff)
downloadpackage-stash-xs-2033654760f55aa6b34262de791a32e98a33a046.tar.gz
package-stash-xs-2033654760f55aa6b34262de791a32e98a33a046.zip
better diagnostics for exception tests
Diffstat (limited to 't/03-io.t')
-rw-r--r--t/03-io.t4
1 files changed, 2 insertions, 2 deletions
diff --git a/t/03-io.t b/t/03-io.t
index 147b745..8b6e69d 100644
--- a/t/03-io.t
+++ b/t/03-io.t
@@ -40,9 +40,9 @@ use Package::Stash;
{
my $stash = Package::Stash->new('Baz');
- ok(!exception {
+ is(exception {
$stash->add_package_symbol('baz', *Foo::foo{IO});
- }, "can add an IO symbol");
+ }, undef, "can add an IO symbol");
ok($stash->has_package_symbol('baz'), "has baz");
is($stash->get_package_symbol('baz'), *Foo::foo{IO}, "got the right baz");
}