summaryrefslogtreecommitdiff
path: root/regcomp.c
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2002-03-27 14:32:00 +0100
committerJarkko Hietaniemi <jhi@iki.fi>2002-03-27 13:53:31 +0000
commitcd84f5b283c99b286b4dbd0ab70732e43d1eb320 (patch)
treeb75878095f065a679c10ded7989e32dad059b7cb /regcomp.c
parent9c406a46272accd6941f5f21f6abc86cdd476f41 (diff)
downloadperl-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.c5
1 files changed, 4 insertions, 1 deletions
diff --git a/regcomp.c b/regcomp.c
index 639f140582..12f9016a4b 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -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)) {