diff options
| author | cvs2svn <cvs2svn@FreeBSD.org> | 2009-04-28 21:27:54 +0000 |
|---|---|---|
| committer | cvs2svn <cvs2svn@FreeBSD.org> | 2009-04-28 21:27:54 +0000 |
| commit | b6bb8c3d3a17625aa826094130b3d84530b6dae4 (patch) | |
| tree | f2de4a4d4b2f5c3fcbd1ee2ea6cce6d571bfb5f7 /lang/perl5.16/files/patch-qr-leak | |
| parent | - Fix PLIST (diff) | |
This commit was manufactured by cvs2svn to create tag 'RELEASE_7_2_0'.release/7.2.0
Diffstat (limited to 'lang/perl5.16/files/patch-qr-leak')
| -rw-r--r-- | lang/perl5.16/files/patch-qr-leak | 16 |
1 files changed, 0 insertions, 16 deletions
diff --git a/lang/perl5.16/files/patch-qr-leak b/lang/perl5.16/files/patch-qr-leak deleted file mode 100644 index 842c0074af46..000000000000 --- a/lang/perl5.16/files/patch-qr-leak +++ /dev/null @@ -1,16 +0,0 @@ -# http://perl5.git.perl.org/perl.git/commitdiff/a954f6ee3112c0edfbc59783d1b424d995122784?hp=711690a16d2a16be7070e06779c46a6d8f482689 -diff --git a/pp_hot.c b/pp_hot.c -index 57fa328..4a4e9e8 100644 ---- pp_hot.c -+++ pp_hot.c -@@ -1198,6 +1198,9 @@ PP(pp_qr) - if (rx->extflags & RXf_TAINTED) - SvTAINTED_on(rv); - sv_magic(sv,(SV*)ReREFCNT_inc(rx), PERL_MAGIC_qr,0,0); -+ if (pkg) { -+ SvREFCNT_dec(pkg); -+ } - XPUSHs(rv); - RETURN; - } - |