was Re: [ID 19991102.003] perl on os390

[p5sagit/p5-mst-13.2.git] / t / pragma / warn / doop

diff --git a/t/pragma/warn/doop b/t/pragma/warn/doop
index 458a3b2..961d157 100644 (file)
--- a/t/pragma/warn/doop
+++ b/t/pragma/warn/doop
@@ -12,11 +12,11 @@ EXPECT
 Malformed UTF-8 character at - line 4.
 ########
 # doop.c
-use warning 'utf8'  ;
+use warnings 'utf8'  ;
 use utf8 ;
 $_ = "\x80  \xff" ;
 chop ;
-no warning 'utf8'  ;
+no warnings 'utf8'  ;
 $_ = "\x80  \xff" ;
 chop ;
 EXPECT