From: Gurusamy Sarathy <gsar@cpan.org>
Date: Sun, 23 Jan 2000 13:01:35 +0000 (+0000)
Subject: fix misclassified warnings
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9845ecbab7c8b0b3a042e639703fe83f2d5b91a7;p=p5sagit%2Fp5-mst-13.2.git

fix misclassified warnings

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

diff --git a/pod/perldiag.pod b/pod/perldiag.pod
index 0da6cb3..d1e64f4 100644
--- a/pod/perldiag.pod
+++ b/pod/perldiag.pod
@@ -1213,13 +1213,13 @@ See L<perlsub/"Constant Functions"> and L<constant>.
 
 =item Constant subroutine %s redefined
 
-(S) You redefined a subroutine which had previously been eligible for
+(S|W) You redefined a subroutine which had previously been eligible for
 inlining.  See L<perlsub/"Constant Functions"> for commentary and
 workarounds.
 
 =item Constant subroutine %s undefined
 
-(S) You undefined a subroutine which had previously been eligible for
+(W) You undefined a subroutine which had previously been eligible for
 inlining.  See L<perlsub/"Constant Functions"> for commentary and
 workarounds.
 
@@ -2156,7 +2156,7 @@ See also L<perlport> for writing portable code.
 
 =item Odd number of elements in hash assignment
 
-(S) You specified an odd number of elements to initialize a hash, which
+(W) You specified an odd number of elements to initialize a hash, which
 is odd, because hashes come in key/value pairs.
 
 =item Offset outside string