be compatible with perl 5.6
[p5sagit/local-lib.git] / t / subroutine-in-inc.t
index d3b4bd3..6d0480f 100644 (file)
@@ -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 );
 }