From f76a19a13268d60479c32fc1f347f15d15fe37d1 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Mon, 11 May 2015 17:07:45 -0400 Subject: one more fix for threaded 5.21 (eserte, jplesnik, #6) this probably also fixes #5 --- t/close-over.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 't/close-over.t') diff --git a/t/close-over.t b/t/close-over.t index 23b2873..905a3f7 100644 --- a/t/close-over.t +++ b/t/close-over.t @@ -44,7 +44,7 @@ use Test::Requires 'PadWalker'; $b = $b->OUTSIDE; } my @visible_in_outer_scope - = grep { defined and $_ ne '&' } + = grep { defined && length && $_ ne '&' } map { $_->PV } grep { $_->can('PV') } map { $_->PADLIST->ARRAYelt(0)->ARRAY } -- cgit v1.2.3-54-g00ecf