Sophie

Sophie

distrib > Mageia > 3 > i586 > media > core-release-src > by-pkgid > 700e0e90d755dbac1f3b9af15ba842ea > files > 2

perl-Net-ext-1.11.0-5.mga3.src.rpm

diff -Naur -x '*~' Net-ext-1.011/Gen.xs Net-ext-1.011-fix-segfault/Gen.xs
--- Net-ext-1.011/Gen.xs	2002-04-10 13:05:58.000000000 +0200
+++ Net-ext-1.011-fix-segfault/Gen.xs	2009-09-13 15:49:51.000000000 +0200
@@ -146,7 +146,7 @@
     CV *cv;
     klen = strlen(name);
     (void) hv_fetch(missing, name, klen, TRUE);
-    cv = newXS(name, NULL, file); /* newSUB with no block */
+    cv = newXS(name, Perl_cv_undef, file); /* newSUB with no block */
     sv_setsv((SV*)cv, &PL_sv_no); /* prototype it as "()" */
 }