X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fsubroutine-in-inc.t;h=6d0480f0f3b4b8ba219fd1b4e1af961f5bc94650;hb=387f80220829f113007b021a7cbfa7e6bb209f01;hp=d3b4bd38b16dbae316a6b1c4ed61b7798924b378;hpb=ea7f2da220a57b05422d1a486c69bb38c1e806ed;p=p5sagit%2Flocal-lib.git diff --git a/t/subroutine-in-inc.t b/t/subroutine-in-inc.t index d3b4bd3..6d0480f 100644 --- a/t/subroutine-in-inc.t +++ b/t/subroutine-in-inc.t @@ -16,9 +16,9 @@ my $dir; BEGIN { $base = CODE_in_INC; - unshift @INC, sub { }; - splice @INC, 3, 1, sub { }; - push @INC, sub { }; + unshift @INC, sub { () }; + splice @INC, 3, 1, sub { () }; + push @INC, sub { () }; $dir = tempdir( DIR => Cwd::abs_path('t'), CLEANUP => 1 ); }