Change 11360 by jhi@alpha on 2001/07/13 15:11:45
Subject: [patch] re_dup
From: Doug MacEachern <[EMAIL PROTECTED]>
Date: Fri, 13 Jul 2001 08:51:24 -0700 (PDT)
Message-ID: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/sv.c#443 edit
Differences ...
==== //depot/perl/sv.c#443 (text) ====
Index: perl/sv.c
--- perl/sv.c.~1~ Fri Jul 13 09:15:05 2001
+++ perl/sv.c Fri Jul 13 09:15:05 2001
@@ -8368,7 +8368,7 @@
if (r->regstclass) {
New(0, ret->regstclass, 1, regnode);
- ret->regstclass->flags = r->regstclass->flags;
+ Copy(r->regstclass, ret->regstclass, 1, regnode);
}
else
ret->regstclass = NULL;
End of Patch.
