diff options
author | Jesse Luehrs <doy@tozt.net> | 2010-11-12 09:25:55 -0600 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2010-11-12 09:25:55 -0600 |
commit | 34805376fa48a707b1a7f52f3a282ee5cacd2cf9 (patch) | |
tree | 024096cf644712dcd827aa87f373131235b01dd1 /t | |
parent | 996a8db0046b5172fadd26b389f73030f00149eb (diff) | |
download | package-stash-xs-34805376fa48a707b1a7f52f3a282ee5cacd2cf9.tar.gz package-stash-xs-34805376fa48a707b1a7f52f3a282ee5cacd2cf9.zip |
has_package_symbol
Diffstat (limited to 't')
-rwxr-xr-x | t/07-edge-cases.t | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/t/07-edge-cases.t b/t/07-edge-cases.t index e544c7a..a742c76 100755 --- a/t/07-edge-cases.t +++ b/t/07-edge-cases.t @@ -24,9 +24,7 @@ use Package::Stash; } my $stash = Package::Stash->new('Foo'); -{ local $TODO = "i think this is a perl bug (see comment in has_package_symbol)"; ok($stash->has_package_symbol('$SCALAR'), '$SCALAR'); -} ok($stash->has_package_symbol('$SCALAR_WITH_VALUE'), '$SCALAR_WITH_VALUE'); ok($stash->has_package_symbol('@ARRAY'), '@ARRAY'); ok($stash->has_package_symbol('%HASH'), '%HASH'); |