From 8e66bbb992f545238fe8541eac0be25b873e577c Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Thu, 3 Jan 2013 22:35:36 -0600 Subject: hey, and that fixed a TODO test --- t/edge-cases.t | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/t/edge-cases.t b/t/edge-cases.t index 58b819e..7424f9e 100755 --- a/t/edge-cases.t +++ b/t/edge-cases.t @@ -56,7 +56,8 @@ is(ref($stash->get_or_add_symbol('$glob')), 'SCALAR', "got an empty scalar"); SKIP: { skip "PP doesn't support anon stashes before 5.14", 4 if $] < 5.014 && $Package::Stash::IMPLEMENTATION eq 'PP'; - local $TODO = "don't know how to properly inflate a stash entry"; + local $TODO = "don't know how to properly inflate a stash entry in PP" + if $Package::Stash::IMPLEMENTATION eq 'PP'; my $anon = {}; # not using Package::Anon $anon->{foo} = -1; # stub -- cgit v1.2.3-54-g00ecf