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.12/files/patch-bug52740 | |
parent | - Fix PLIST (diff) |
This commit was manufactured by cvs2svn to create tag 'RELEASE_7_2_0'.release/7.2.0
Notes
Notes:
svn path=/head/; revision=232918
svn path=/tags/RELEASE_7_2_0/; revision=232919; tag=release/7.2.0
Diffstat (limited to 'lang/perl5.12/files/patch-bug52740')
-rw-r--r-- | lang/perl5.12/files/patch-bug52740 | 15 |
1 files changed, 0 insertions, 15 deletions
diff --git a/lang/perl5.12/files/patch-bug52740 b/lang/perl5.12/files/patch-bug52740 deleted file mode 100644 index 08a73a1547ee..000000000000 --- a/lang/perl5.12/files/patch-bug52740 +++ /dev/null @@ -1,15 +0,0 @@ -# http://rt.perl.org/rt3/Public/Bug/Display.html?id=52740 -# http://perl5.git.perl.org/perl.git/commitdiff/785bee4f7cf89837cba8e6e0859abbb4b407e1f1?hp=90e91dd8c9549b16c38f6ab2e9fa25c7ea28dff8 -diff --git a/sv.c b/sv.c -index f721e6f..5fcf018 100644 ---- sv.c -+++ sv.c -@@ -3717,7 +3717,7 @@ Perl_sv_setsv_flags(pTHX_ SV *dstr, register SV* sstr, const I32 flags) - Perl_croak(aTHX_ "Cannot copy to %s", type); - } else if (sflags & SVf_ROK) { - if (isGV_with_GP(dstr) && dtype == SVt_PVGV -- && SvTYPE(SvRV(sstr)) == SVt_PVGV) { -+ && SvTYPE(SvRV(sstr)) == SVt_PVGV && isGV_with_GP(SvRV(sstr))) { - sstr = SvRV(sstr); - if (sstr == dstr) { - if (GvIMPORTED(dstr) != GVf_IMPORTED |