Author: stas
Date: Tue Dec 14 14:41:54 2004
New Revision: 111891

URL: http://svn.apache.org/viewcvs?view=rev&rev=111891
Log:
fix compilation issues in ModPerl::Util::current_perl_id (on some
builds newSVpvf can't be resolved but Perl_newSVpvf works just
fine)

Modified:
   perl/modperl/trunk/Changes
   perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h

Modified: perl/modperl/trunk/Changes
Url: 
http://svn.apache.org/viewcvs/perl/modperl/trunk/Changes?view=diff&rev=111891&p1=perl/modperl/trunk/Changes&r1=111890&p2=perl/modperl/trunk/Changes&r2=111891
==============================================================================
--- perl/modperl/trunk/Changes  (original)
+++ perl/modperl/trunk/Changes  Tue Dec 14 14:41:54 2004
@@ -12,6 +12,10 @@
 
 =item 1.99_19-dev
 
+fix compilation issues in ModPerl::Util::current_perl_id (on some
+builds newSVpvf can't be resolved but Perl_newSVpvf works just
+fine). [Stas, Markus Wichitill <[EMAIL PROTECTED]>]
+
 fix APR::Error::str to return a lexical variable, rather than a
 string. This function is called by SvTRUE in modperl_errsv() via
 overload and on win32 (and randomly on linux) causes crashes via:

Modified: perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h
Url: 
http://svn.apache.org/viewcvs/perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h?view=diff&rev=111891&p1=perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h&r1=111890&p2=perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h&r2=111891
==============================================================================
--- perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h  (original)
+++ perl/modperl/trunk/xs/ModPerl/Util/ModPerl__Util.h  Tue Dec 14 14:41:54 2004
@@ -15,10 +15,10 @@
 
 #ifdef USE_ITHREADS
 #define mpxs_ModPerl__Util_current_perl_id() \
-    newSVpvf("0x%lx", (unsigned long)aTHX)
+    Perl_newSVpvf(aTHX_ "0x%lx", (unsigned long)aTHX)
 #else
 #define mpxs_ModPerl__Util_current_perl_id() \
-    newSVpvf("0x%lx", 0)
+    Perl_newSVpvf(aTHX_ "0x%lx", 0)
 #endif
 
 static MP_INLINE void mpxs_ModPerl__Util_untaint(pTHX_ I32 items,

Reply via email to