Change 14174 by jhi@alpha on 2002/01/10 19:33:29

        Subject: micropatch
        From: Hugo van der Sanden <[EMAIL PROTECTED]>
        Date: Thu, 10 Jan 2002 18:20:58 +0000
        Message-Id: <[EMAIL PROTECTED]>

Affected files ...

.... //depot/perl/regcomp.c#277 edit

Differences ...

==== //depot/perl/regcomp.c#277 (text) ====
Index: perl/regcomp.c
--- perl/regcomp.c.~1~  Thu Jan 10 12:45:06 2002
+++ perl/regcomp.c      Thu Jan 10 12:45:06 2002
@@ -2361,9 +2361,7 @@
     }
     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) {
End of Patch.

Reply via email to