summaryrefslogtreecommitdiff
path: root/gv.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-02-07 16:09:54 +0000
committerGurusamy Sarathy <gsar@cpan.org>2000-02-07 16:09:54 +0000
commit6a8181172ab18fb057dd6fb202936705ede77746 (patch)
tree3b496baf200a0745d01c384d216a2c08243f271b /gv.c
parente9ff6d2717dce18093d60b3839463976bb523752 (diff)
downloadperl-6a8181172ab18fb057dd6fb202936705ede77746.tar.gz
${^Warnings} renamed to ${^WARNING_BITS}
p4raw-id: //depot/perl@5025
Diffstat (limited to 'gv.c')
-rw-r--r--gv.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/gv.c b/gv.c
index f65b1ce35a..e254c86305 100644
--- a/gv.c
+++ b/gv.c
@@ -845,8 +845,8 @@ Perl_gv_fetchpv(pTHX_ const char *nambeg, I32 add, I32 sv_type)
if (len > 1)
break;
goto ro_magicalize;
- case '\027': /* $^W & $^Warnings */
- if (len > 1 && strNE(name, "\027arnings"))
+ case '\027': /* $^W & $^WARNING_BITS */
+ if (len > 1 && strNE(name, "\027ARNING_BITS"))
break;
goto magicalize;