diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2002-03-27 14:32:00 +0100 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-27 13:53:31 +0000 |
commit | cd84f5b283c99b286b4dbd0ab70732e43d1eb320 (patch) | |
tree | b75878095f065a679c10ded7989e32dad059b7cb /regcomp.c | |
parent | 9c406a46272accd6941f5f21f6abc86cdd476f41 (diff) | |
download | perl-cd84f5b283c99b286b4dbd0ab70732e43d1eb320.tar.gz |
A warning wasn't turnable off
Message-ID: <20020327133200.A18945@rafael>
p4raw-id: //depot/perl@15547
Diffstat (limited to 'regcomp.c')
-rw-r--r-- | regcomp.c | 5 |
1 files changed, 4 insertions, 1 deletions
@@ -3483,7 +3483,10 @@ S_checkposixcc(pTHX_ RExC_state_t *pRExC_state) while(*s && isALNUM(*s)) s++; if (*s && c == *s && s[1] == ']') { - vWARN3(s+2, "POSIX syntax [%c %c] belongs inside character classes", c, c); + if (ckWARN(WARN_REGEXP)) + vWARN3(s+2, + "POSIX syntax [%c %c] belongs inside character classes", + c, c); /* [[=foo=]] and [[.foo.]] are still future. */ if (POSIXCC_NOTYET(c)) { |