X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FPackage-Stash.git;a=blobdiff_plain;f=t%2Fedge-cases.t;fp=t%2Fedge-cases.t;h=49f56edd6034c22b1020e756eaeea6dca1e90301;hp=262c13b69842167490ed266d42035c4a99ce6418;hb=42b01b3381c4157c2fb4ea0905b653ff52e977ca;hpb=e068010b38c06c1632291ea6bdc2560d63305dc1 diff --git a/t/edge-cases.t b/t/edge-cases.t index 262c13b..49f56ed 100755 --- a/t/edge-cases.t +++ b/t/edge-cases.t @@ -56,9 +56,7 @@ 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 = ($Package::Stash::IMPLEMENTATION eq 'PP') - ? "don't know how to properly inflate a stash entry" - : undef; + local $TODO = "don't know how to properly inflate a stash entry"; my $anon = {}; # not using Package::Anon $anon->{foo} = -1; # stub