diff options
| author | Jesse Luehrs <doy@tozt.net> | 2011-12-10 01:51:20 -0600 |
|---|---|---|
| committer | Jesse Luehrs <doy@tozt.net> | 2011-12-10 01:51:20 -0600 |
| commit | e0cd2c900de2f28af4373f1f596134af445adb0f (patch) | |
| tree | cfe8af49b79e74105f702b9fa72552b4a0a3fca8 /t/edge-cases.t | |
| parent | fb4f6d8a7deae9d951ac16c5882ff2146ab5f6f2 (diff) | |
| download | package-stash-xs-e0cd2c900de2f28af4373f1f596134af445adb0f.tar.gz package-stash-xs-e0cd2c900de2f28af4373f1f596134af445adb0f.zip | |
don't know how to do these in xs either yet
Diffstat (limited to 't/edge-cases.t')
| -rwxr-xr-x | t/edge-cases.t | 4 |
1 files changed, 1 insertions, 3 deletions
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 |