diff options
Diffstat (limited to 'textproc')
-rw-r--r-- | textproc/p5-XML-LibXML/Makefile | 4 | ||||
-rw-r--r-- | textproc/p5-XML-LibXML/files/500503-patch-LibXML.xs | 22 |
2 files changed, 26 insertions, 0 deletions
diff --git a/textproc/p5-XML-LibXML/Makefile b/textproc/p5-XML-LibXML/Makefile index d88cabfb42d7..2013a3e17f3b 100644 --- a/textproc/p5-XML-LibXML/Makefile +++ b/textproc/p5-XML-LibXML/Makefile @@ -37,4 +37,8 @@ MAN3= XML::LibXML.3 XML::LibXML::Attr.3 XML::LibXML::Boolean.3 \ .include <bsd.port.pre.mk> +.if ${PERL_LEVEL} < 500600 +EXTRA_PATCHES= ${FILESDIR}/500503-* +.endif + .include <bsd.port.post.mk> diff --git a/textproc/p5-XML-LibXML/files/500503-patch-LibXML.xs b/textproc/p5-XML-LibXML/files/500503-patch-LibXML.xs new file mode 100644 index 000000000000..0572e45a3527 --- /dev/null +++ b/textproc/p5-XML-LibXML/files/500503-patch-LibXML.xs @@ -0,0 +1,22 @@ +--- LibXML.xs.orig Sun May 16 19:56:30 2004 ++++ LibXML.xs Sun May 16 19:57:29 2004 +@@ -75,6 +75,19 @@ + #define TEST_PERL_FLAG(flag) \ + SvTRUE(perl_get_sv(flag, FALSE)) ? 1 : 0 + ++#ifndef SvPV_nolen ++#define SvPV_nolen(sv) \ ++ ((SvFLAGS(sv) & (SVf_POK)) == SVf_POK \ ++ ? SvPVX(sv) : sv_2pv_nolen(sv)) ++ ++static char * ++sv_2pv_nolen(register SV *sv) ++{ ++ STRLEN n_a; ++ return sv_2pv(sv, &n_a); ++} ++#endif ++ + static SV * LibXML_match_cb = NULL; + static SV * LibXML_read_cb = NULL; + static SV * LibXML_open_cb = NULL; |