In utf8decode.t, use warning_is() for the should-not-warn cases.

[perl5.git] / t / op / exists_sub.t

diff --git a/t/op/exists_sub.t b/t/op/exists_sub.t
old mode 100755 (executable)
new mode 100644 (file)
index 3363dfd..012ea33
--- a/t/op/exists_sub.t
+++ b/t/op/exists_sub.t
@@ -2,13 +2,13 @@
 
 BEGIN {
     chdir 't' if -d 't';
-    unshift @INC, '../lib';
+    @INC = '../lib';
 }
 
 print "1..9\n";
 
 sub t1;
-sub t2 : locked;
+sub t2 : lvalue;
 sub t3 ();
 sub t4 ($);
 sub t5 {1;}