stas 2004/08/22 22:12:51
Modified: src/modules/perl modperl_perl_includes.h . Changes Log: Fix a compilation problem breaking 1.99_15 (sv_copypv was added in perl 5.7.3) Submitted by: Jason Woodward <[EMAIL PROTECTED]> Revision Changes Path 1.20 +17 -0 modperl-2.0/src/modules/perl/modperl_perl_includes.h Index: modperl_perl_includes.h =================================================================== RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_perl_includes.h,v retrieving revision 1.19 retrieving revision 1.20 diff -u -u -r1.19 -r1.20 --- modperl_perl_includes.h 4 Mar 2004 06:01:07 -0000 1.19 +++ modperl_perl_includes.h 23 Aug 2004 05:12:51 -0000 1.20 @@ -112,4 +112,21 @@ # define environ (*_NSGetEnviron()) #endif +/* sv_copypv was added in perl 5.7.3 */ +#ifndef sv_copypv +# define sv_copypv(dsv, ssv) \ + STMT_START { \ + STRLEN len; \ + char *s; \ + s = SvPV(ssv, len); \ + sv_setpvn(dsv, s, len); \ + if (SvUTF8(ssv)) { \ + SvUTF8_on(dsv); \ + } \ + else { \ + SvUTF8_off(dsv); \ + } \ + } STMT_END +#endif + #endif /* MODPERL_PERL_INCLUDES_H */ 1.461 +3 -0 modperl-2.0/Changes Index: Changes =================================================================== RCS file: /home/cvs/modperl-2.0/Changes,v retrieving revision 1.460 retrieving revision 1.461 diff -u -u -r1.460 -r1.461 --- Changes 22 Aug 2004 20:47:37 -0000 1.460 +++ Changes 23 Aug 2004 05:12:51 -0000 1.461 @@ -12,6 +12,9 @@ =item 1.99_16-dev +Fix a compilation problem breaking 1.99_15 (sv_copypv was added in +perl 5.7.3) [Jason Woodward <[EMAIL PROTECTED]>] + Added $r->content_languages in Apache::RequestRec [Gozer] APR::Bucket: add delete() and destroy() methods [Stas]