From: Hugo van der Sanden <hv@crypt.org>
Date: Thu, 10 Jan 2002 18:20:58 +0000 (+0000)
Subject: micropatch
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=32a0ca981d227febefbe7afb901dbcb1c90ce29c;p=p5sagit%2Fp5-mst-13.2.git

micropatch
Message-Id: <200201101820.g0AIKw208580@crypt.compulink.co.uk>

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

diff --git a/regcomp.c b/regcomp.c
index 8399899..65b0a5f 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) {