diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-08-29 10:18:59 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-08-29 10:18:59 +0000 |
| commit | 4438c4b75b842b6c829a7da9841e97abb875b1d8 (patch) | |
| tree | 559b1a700465df1cb1ae02ada9b9c9e48dd9539f /t/pragma/warn/utf8 | |
| parent | 6dd159d1401b9b9973dd00c1235374efbcb27144 (diff) | |
| download | perl-4438c4b75b842b6c829a7da9841e97abb875b1d8.tar.gz | |
Rename warning to warnings, from Paul Marquess.
p4raw-id: //depot/cfgperl@4038
Diffstat (limited to 't/pragma/warn/utf8')
| -rw-r--r-- | t/pragma/warn/utf8 | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/t/pragma/warn/utf8 b/t/pragma/warn/utf8 index 380d53bbcc..30f552a231 100644 --- a/t/pragma/warn/utf8 +++ b/t/pragma/warn/utf8 @@ -25,9 +25,9 @@ Malformed UTF-8 character at - line 3. use utf8 ; my $a = ord "\x80" ; { - use warning 'utf8' ; + use warnings 'utf8' ; my $a = ord "\x80" ; - no warning 'utf8' ; + no warnings 'utf8' ; my $a = ord "\x80" ; } EXPECT @@ -45,9 +45,9 @@ Malformed UTF-8 character at - line 3. use utf8 ; my $a = ord "\xf080" ; { - use warning 'utf8' ; + use warnings 'utf8' ; my $a = ord "\xf080" ; - no warning 'utf8' ; + no warnings 'utf8' ; my $a = ord "\xf080" ; } EXPECT |