diff options
| author | taca <taca> | 2011-04-07 04:03:57 +0000 |
|---|---|---|
| committer | taca <taca> | 2011-04-07 04:03:57 +0000 |
| commit | eb49cc445e89fddd442ec2d42b6bf6435c100d74 (patch) | |
| tree | b59198d8dc9798f69475fd88786b86d7c5c12c45 /lang | |
| parent | 340f4f76f9bb9ceeda240d525a4943e24dc3df01 (diff) | |
| download | pkgsrc-eb49cc445e89fddd442ec2d42b6bf6435c100d74.tar.gz | |
Add a patch to fix for http://secunia.com/advisories/43921/ from perl's
git repository (539689e74a).
Bump PKGREVISION.
Diffstat (limited to 'lang')
| -rw-r--r-- | lang/perl5/Makefile | 4 | ||||
| -rw-r--r-- | lang/perl5/distinfo | 3 | ||||
| -rw-r--r-- | lang/perl5/patches/patch-pp.c | 34 |
3 files changed, 38 insertions, 3 deletions
diff --git a/lang/perl5/Makefile b/lang/perl5/Makefile index f3698c701ec..9172053eed9 100644 --- a/lang/perl5/Makefile +++ b/lang/perl5/Makefile @@ -1,9 +1,9 @@ -# $NetBSD: Makefile,v 1.170 2011/01/30 21:31:42 wiz Exp $ +# $NetBSD: Makefile,v 1.171 2011/04/07 04:03:57 taca Exp $ .include "license.mk" .include "Makefile.common" -PKGREVISION= 1 +PKGREVISION= 2 COMMENT= Practical Extraction and Report Language PKG_DESTDIR_SUPPORT= user-destdir diff --git a/lang/perl5/distinfo b/lang/perl5/distinfo index 51da9ab2d33..87c1a796e46 100644 --- a/lang/perl5/distinfo +++ b/lang/perl5/distinfo @@ -1,4 +1,4 @@ -$NetBSD: distinfo,v 1.73 2011/01/30 21:35:43 wiz Exp $ +$NetBSD: distinfo,v 1.74 2011/04/07 04:03:58 taca Exp $ SHA1 (perl-5.12.2.tar.gz) = c157f214a93ce20fc06dc9d9c902c05ad1327cb1 RMD160 (perl-5.12.2.tar.gz) = b1fd7f05d96fa6a263d3622654af6b584c308ce4 @@ -17,6 +17,7 @@ SHA1 (patch-cp) = 0b22d334df24d128142855464bf6dd61d4d82975 SHA1 (patch-dm) = 8e8a0ede0f371ef0ad3a0433912967f3b8f3dd43 SHA1 (patch-ds) = e14502548e2b9579b9ac654bbc83d78cd249e8ab SHA1 (patch-dt) = 4d15e650b3aa9a1c8e50e5f9db91d82db3b68b8f +SHA1 (patch-pp.c) = fc8eaa16bfb214d4c346827fbffa7cd345f46c4b SHA1 (patch-ta) = 69f0d2df022eb8ff0dbcc77bde638cdc9c6391b1 SHA1 (patch-zc) = c2a4c65a849f221294eaa61b52cd1fcb196e675b SHA1 (patch-zd) = 15532739b4a582da322d3e51fc364905bacbcd7e diff --git a/lang/perl5/patches/patch-pp.c b/lang/perl5/patches/patch-pp.c new file mode 100644 index 00000000000..23260c2c1b9 --- /dev/null +++ b/lang/perl5/patches/patch-pp.c @@ -0,0 +1,34 @@ +$NetBSD: patch-pp.c,v 1.1 2011/04/07 04:03:58 taca Exp $ + +* Fix for http://secunia.com/advisories/43921/ from perl's git repository + (539689e74a). + +--- pp.c.orig 2010-09-06 23:30:32.000000000 +0000 ++++ pp.c +@@ -3949,6 +3949,8 @@ PP(pp_ucfirst) + SvCUR_set(dest, need - 1); + } + } ++ if (dest != source && SvTAINTED(source)) ++ SvTAINT(dest); + SvSETMAGIC(dest); + RETURN; + } +@@ -4222,6 +4224,8 @@ PP(pp_uc) + SvCUR_set(dest, d - (U8*)SvPVX_const(dest)); + } + } /* End of isn't utf8 */ ++ if (dest != source && SvTAINTED(source)) ++ SvTAINT(dest); + SvSETMAGIC(dest); + RETURN; + } +@@ -4433,6 +4437,8 @@ PP(pp_lc) + SvCUR_set(dest, d - (U8*)SvPVX_const(dest)); + } + } ++ if (dest != source && SvTAINTED(source)) ++ SvTAINT(dest); + SvSETMAGIC(dest); + RETURN; + } |