You are viewing a plain text version of this content. The canonical link for it is here.
Posted to embperl-cvs@perl.apache.org by ri...@apache.org on 2004/08/16 07:39:19 UTC
cvs commit: embperl epinit.c mod_embperl.c
richter 2004/08/15 22:39:19
Modified: . epinit.c mod_embperl.c
Log:
Avoid global destruct warnings during apache startup
Revision Changes Path
1.19 +1 -1 embperl/epinit.c
Index: epinit.c
===================================================================
RCS file: /home/cvs/embperl/epinit.c,v
retrieving revision 1.18
retrieving revision 1.19
diff -u -r1.18 -r1.19
--- epinit.c 16 Aug 2004 05:30:05 -0000 1.18
+++ epinit.c 16 Aug 2004 05:39:19 -0000 1.19
@@ -420,7 +420,7 @@
hv_magic(pHash, (GV *)pTie, 'P') ;
*ppHash = pHash ;
- *ppObj = pTie ;
+ *ppObj = SvREFCNT_inc(pTie) ;
return ok ;
}
1.22 +0 -0 embperl/mod_embperl.c
Index: mod_embperl.c
===================================================================
RCS file: /home/cvs/embperl/mod_embperl.c,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -r1.21 -r1.22
---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-cvs-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-cvs-help@perl.apache.org