You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by ch...@hyperreal.org on 1999/11/15 21:05:28 UTC
cvs commit: modperl/Leak Leak.xs
cholet 99/11/15 12:05:28
Modified: Leak Leak.xs
Log:
ActivePerl fix [Jochen Wiedmann <jo...@ispsoft.de>]
Revision Changes Path
1.3 +1 -1 modperl/Leak/Leak.xs
Index: Leak.xs
===================================================================
RCS file: /export/home/cvs/modperl/Leak/Leak.xs,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- Leak.xs 1999/04/07 05:03:33 1.2
+++ Leak.xs 1999/11/15 20:05:27 1.3
@@ -52,7 +52,7 @@
while (p) {
if (p->sv == sv) {
char *old = p->tag;
- p->tag = tag;
+ p->tag = (char *) tag;
return old;
}
p = p->link;