projects
/
perl
/
modules
/
Hash-Normalize.git
/ commitdiff
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
| inline |
side by side
(parent:
76bf776
)
Update VPIT::TestHelpers to 15e8aee3
master
author
Vincent Pit <perl@profvince.com>
Sat, 4 Nov 2017 14:41:05 +0000 (15:41 +0100)
committer
Vincent Pit <perl@profvince.com>
Sat, 4 Nov 2017 14:41:05 +0000 (15:41 +0100)
t/lib/VPIT/TestHelpers.pm
patch
|
blob
|
history
diff --git
a/t/lib/VPIT/TestHelpers.pm
b/t/lib/VPIT/TestHelpers.pm
index
10550ee
..
f47bee1
100644
(file)
--- a/
t/lib/VPIT/TestHelpers.pm
+++ b/
t/lib/VPIT/TestHelpers.pm
@@
-97,7
+97,9
@@
my $test_sub = sub {
}
my $glob = $stash->{$sub};
- return $glob ? *$glob{CODE} : undef;
+ return ref \$glob eq 'GLOB' ? *$glob{CODE}
+ : ref $glob eq 'CODE' ? $glob
+ : undef;
};
sub skip { $test_sub->('skip')->(@_) }