projects
/
p5sagit/strictures.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
refactor extras loading
[p5sagit/strictures.git]
/
t
/
extras.t
diff --git
a/t/extras.t
b/t/extras.t
index
b8c5ecf
..
cef6a6c
100644
(file)
--- a/
t/extras.t
+++ b/
t/extras.t
@@
-79,7
+79,7
@@
use strictures;
{
local $ENV{PERL_STRICTURES_EXTRA} = 1;
- local $strictures::extra_load_states = undef;
+ local %strictures::extra_load_states = ();
local @INC = (sub {
die "Can't locate $_[1] in \@INC (...).\n"
if $extras{$_[1]};