rpms/perl/F-9 perl-5.10.0-stlocal.patch, NONE, 1.1 perl.spec, 1.181, 1.182

[Lubomir Rintel]

Author: lkundrak

Update of /cvs/pkgs/rpms/perl/F-9
In directory cvs1.fedora.phx.redhat.com:/tmp/cvs-serv14432

Modified Files:
	perl.spec 
Added Files:
	perl-5.10.0-stlocal.patch 
Log Message:
* Sun Oct 12 2008 Lubomir Rintel <lkundrak at v3.sk> 4:5.10.0-36-fc9
- Include fix for rt#52740 to fix a crash when using Devel::Symdump and
  Compress::Zlib together


perl-5.10.0-stlocal.patch:

--- NEW FILE perl-5.10.0-stlocal.patch ---
This fixes #52740: crash when localizing a symtab entry [1]
It was pulled to -current in 33807 which was superseded by 34213.
For 5.10.x, this was pulled in by 34295.

diff -up perl-5.10.0/sv.c.stlocal perl-5.10.0/sv.c
--- perl-5.10.0/sv.c.stlocal	2008-10-12 10:31:28.000000000 +0200
+++ perl-5.10.0/sv.c	2008-10-12 10:31:39.000000000 +0200
@@ -3546,7 +3546,7 @@ Perl_sv_setsv_flags(pTHX_ SV *dstr, regi
 	    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


Index: perl.spec
===================================================================
RCS file: /cvs/pkgs/rpms/perl/F-9/perl.spec,v
retrieving revision 1.181
retrieving revision 1.182
diff -u -r1.181 -r1.182
--- perl.spec	17 Sep 2008 14:28:47 -0000	1.181
+++ perl.spec	12 Oct 2008 09:12:52 -0000	1.182
@@ -16,7 +16,7 @@
 
 Name:           perl
 Version:        %{perl_version}
-Release:        34%{?dist}
+Release:        35%{?dist}
 Epoch:          %{perl_epoch}
 Summary:        The Perl programming language
 Group:          Development/Languages
@@ -95,6 +95,9 @@
 # Archive::Tar update to 1.38 version
 Patch21:    perl-5.10.0-ArchiveTar1.38.patch
 
+# Fix crash when localizing a symtab entry rt#52740
+Patch22:    perl-5.10.0-stlocal.patch
+
 BuildRoot:      %{_tmppath}/%{name}-%{perl_version}-%{release}-root-%(%{__id_u} -n)
 BuildRequires:  tcsh, dos2unix, man, groff
 BuildRequires:  gdbm-devel, db4-devel, zlib-devel
@@ -822,6 +825,7 @@
 %patch19 -p1
 %patch20 -p1
 %patch21 -p1
+%patch22 -p1
 
 #
 # Candidates for doc recoding (need case by case review):
@@ -1042,6 +1046,7 @@
 perl -x patchlevel.h 'Fedora Patch19: CGI bug in exists()'
 perl -x patchlevel.h 'Fedora Patch20: Update Test::Simple to 0.80'
 perl -x patchlevel.h 'Fedora Patch21: Archive::Tar 1.38'
+perl -x patchlevel.h 'Fedora Patch22: Fix crash when localizing a symtab entry - rt52740'
 
 %clean
 rm -rf $RPM_BUILD_ROOT
@@ -1647,6 +1652,10 @@
 
 # Old changelog entries are preserved in CVS.
 %changelog
+* Sun Oct 12 2008 Lubomir Rintel <lkundrak at v3.sk> 4:5.10.0-36-fc9
+- Include fix for rt#52740 to fix a crash when using Devel::Symdump and
+  Compress::Zlib together
+
 * Wed Sep 17 2008 Marcela Maslanova <mmaslano at redhat.com> 4:5.10.0-35.fc9
 - remove Tar.pm from Archive-Extract
 - fix version of Test::Simple in spec