diff options
Diffstat (limited to 't/07-edge-cases.t')
| -rwxr-xr-x | t/07-edge-cases.t | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/t/07-edge-cases.t b/t/07-edge-cases.t index 75df7ac..2710c5c 100755 --- a/t/07-edge-cases.t +++ b/t/07-edge-cases.t @@ -24,7 +24,9 @@ use Package::Stash; } my $stash = Package::Stash->new('Foo'); +{ local $TODO = $] < 5.010 ? "undef scalars aren't visible on 5.8" : undef; ok($stash->has_symbol('$SCALAR'), '$SCALAR'); +} ok($stash->has_symbol('$SCALAR_WITH_VALUE'), '$SCALAR_WITH_VALUE'); ok($stash->has_symbol('@ARRAY'), '@ARRAY'); ok($stash->has_symbol('%HASH'), '%HASH'); |