summaryrefslogtreecommitdiff
path: root/regcomp.c
diff options
context:
space:
mode:
authorHugo van der Sanden <hv@crypt.org>2002-01-10 18:20:58 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2002-01-10 19:33:29 +0000
commit32a0ca981d227febefbe7afb901dbcb1c90ce29c (patch)
treec645afbcfdc3f74a350360004967465cc6a19dc0 /regcomp.c
parentc7e0473b8e90b1186d09d2a13305e6a99b832bfe (diff)
downloadperl-32a0ca981d227febefbe7afb901dbcb1c90ce29c.tar.gz
micropatch
Message-Id: <200201101820.g0AIKw208580@crypt.compulink.co.uk> p4raw-id: //depot/perl@14174
Diffstat (limited to 'regcomp.c')
-rw-r--r--regcomp.c4
1 files changed, 1 insertions, 3 deletions
diff --git a/regcomp.c b/regcomp.c
index 8399899271..65b0a5f6e3 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -2361,9 +2361,7 @@ S_reg(pTHX_ RExC_state_t *pRExC_state, I32 paren, I32 *flagp)
}
else if (paren != '?') /* Not Conditional */
ret = br;
- if (flags&HASWIDTH)
- *flagp |= HASWIDTH;
- *flagp |= flags&SPSTART;
+ *flagp |= flags & (SPSTART | HASWIDTH);
lastbr = br;
while (*RExC_parse == '|') {
if (!SIZE_ONLY && RExC_extralen) {