From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Tue, 15 Jan 2002 15:36:30 +0000 (+0100)
Subject: Style issue
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=271595ccfa2b8feb1491512173d5ac42651d16f1;p=p5sagit%2Fp5-mst-13.2.git

Style issue
Message-ID: <20020115153630.A11568@rafael>

p4raw-id: //depot/perl@14278
---

diff --git a/pod/perldiag.pod b/pod/perldiag.pod
index af78458..a47dda1 100644
--- a/pod/perldiag.pod
+++ b/pod/perldiag.pod
@@ -1472,7 +1472,7 @@ to the end of your file without finding such a line.
 (W redefine) You redefined a format.  To suppress this warning, say
 
     {
-	no warnings;
+	no warnings 'redefine';
 	eval "format NAME =...";
     }
 
@@ -3300,7 +3300,7 @@ C<can> may break this.
 (W redefine) You redefined a subroutine.  To suppress this warning, say
 
     {
-	no warnings;
+	no warnings 'redefine';
 	eval "sub name { ... }";
     }