diff options
| -rw-r--r-- | Changes | 1 | ||||
| -rw-r--r-- | t/close-over.t | 4 |
2 files changed, 3 insertions, 2 deletions
@@ -1,6 +1,7 @@ Revision history for Eval-Closure {{$NEXT}} + - fix tests under blead (sprout, #4) 0.11 2013-07-30 - add "alias => 1" option for making closure variables actually alias the diff --git a/t/close-over.t b/t/close-over.t index 254ec40..23b2873 100644 --- a/t/close-over.t +++ b/t/close-over.t @@ -44,9 +44,9 @@ use Test::Requires 'PadWalker'; $b = $b->OUTSIDE; } my @visible_in_outer_scope - = grep { $_ ne '&' } + = grep { defined and $_ ne '&' } map { $_->PV } - grep { $_->isa('B::PV') } + grep { $_->can('PV') } map { $_->PADLIST->ARRAYelt(0)->ARRAY } @scopes; |