This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Silence warnings in Pod::Man
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Thu, 9 Nov 2006 13:33:57 +0000 (13:33 +0000)
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Thu, 9 Nov 2006 13:33:57 +0000 (13:33 +0000)
p4raw-id: //depot/perl@29242

lib/Pod/t/man.t

index b293eb4..e09f8de 100644 (file)
@@ -42,6 +42,7 @@ while (<DATA>) {
 
     while (<DATA>) {
         last if $_ eq "###\n";
+        no warnings 'utf8';
         print TMP $_;
     }
     close TMP;