SYN SYN

[p5sagit/p5-mst-13.2.git] / t / op / assignwarn.t

diff --git a/t/op/assignwarn.t b/t/op/assignwarn.t
index 00f7abb..2d05b82 100755 (executable)
--- a/t/op/assignwarn.t
+++ b/t/op/assignwarn.t
@@ -8,12 +8,12 @@
 
 BEGIN {
     chdir 't' if -d 't';
-    unshift @INC, '../lib';
+    @INC = '../lib';
 }
 
 use strict;
+use warnings;
 
-$^W = 1;
 my $warn = "";
 $SIG{q(__WARN__)} = sub { print $warn; $warn .= join("",@_) };