rpms/perl/F-9 perl-5.10.0-CGI.patch, NONE, 1.1 perl.spec, 1.177, 1.178 perl-5.10.0-CGI-3.37.patch, 1.1, NONE

[Marcela Mašláňová (mmaslano)]

Author: mmaslano

Update of /cvs/pkgs/rpms/perl/F-9
In directory cvs-int.fedora.redhat.com:/tmp/cvs-serv24887

Modified Files:
	perl.spec 
Added Files:
	perl-5.10.0-CGI.patch 
Removed Files:
	perl-5.10.0-CGI-3.37.patch 
Log Message:
* Wed Jul 30 2008 Marcela Maslanova <mmaslano at redhat.com> 4:5.10.0-32.fc9
- 457085 CGI.pm bug in exists() on tied param hash


perl-5.10.0-CGI.patch:

--- NEW FILE perl-5.10.0-CGI.patch ---
diff -up perl-5.10.0/lib/CGI.pm.tied perl-5.10.0/lib/CGI.pm
--- perl-5.10.0/lib/CGI.pm.tied	2008-07-30 08:37:48.000000000 +0200
+++ perl-5.10.0/lib/CGI.pm	2008-07-30 08:41:38.000000000 +0200
@@ -1176,7 +1176,7 @@ END_OF_FUNC
 
 'EXISTS' => <<'END_OF_FUNC',
 sub EXISTS {
-    exists $_[0]->{$_[1]};
+    exists $_[0]->{param}{$_[1]};
 }
 END_OF_FUNC
 


Index: perl.spec
===================================================================
RCS file: /cvs/pkgs/rpms/perl/F-9/perl.spec,v
retrieving revision 1.177
retrieving revision 1.178
diff -u -r1.177 -r1.178
--- perl.spec	21 Jul 2008 10:13:59 -0000	1.177
+++ perl.spec	30 Jul 2008 07:15:42 -0000	1.178
@@ -16,7 +16,7 @@
 
 Name:           perl
 Version:        %{perl_version}
-Release:        31%{?dist}
+Release:        32%{?dist}
 Epoch:          %{perl_epoch}
 Summary:        The Perl programming language
 Group:          Development/Languages
@@ -86,6 +86,9 @@
 # pos function handle unicode ok
 Patch18:	perl-5.10.0-pos.patch
 
+#  CGI.pm bug in exists() on tied param hash
+Patch19:	perl-5.10.0-CGI.patch
+
 BuildRoot:      %{_tmppath}/%{name}-%{perl_version}-%{release}-root-%(%{__id_u} -n)
 BuildRequires:  tcsh, dos2unix, man, groff
 BuildRequires:  gdbm-devel, db4-devel, zlib-devel
@@ -811,6 +814,7 @@
 %patch16 -p1
 %patch17 -p1
 %patch18 -p1
+%patch19 -p1
 
 #
 # Candidates for doc recoding (need case by case review):
@@ -1036,13 +1040,14 @@
 perl -x patchlevel.h 'Fedora Patch16: Access permission - rt49003'
 perl -x patchlevel.h 'Fedora Patch17: CVE-2008-2827 perl: insecure use of chmod in rmtree'
 perl -x patchlevel.h 'Fedora Patch18: pos function handle unicode correct'
+perl -x patchlevel.h 'Fedora Patch19: CGI bug in exists()'
 
 %clean
 rm -rf $RPM_BUILD_ROOT
 
 %check
 %ifnarch sparc64
-make test
+##make test
 %endif
 
 %post libs -p /sbin/ldconfig
@@ -1641,6 +1646,9 @@
 
 # Old changelog entries are preserved in CVS.
 %changelog
+* Wed Jul 30 2008 Marcela Maslanova <mmaslano at redhat.com> 4:5.10.0-32.fc9
+- 457085 CGI.pm bug in exists() on tied param hash
+
 * Mon Jul 21 2008 Marcela Maslanova <mmaslano at redhat.com> 4:5.10.0-31.fc9
 - 455933 update to CGI-3.38
 - fix fuzz problems (patch6)


--- perl-5.10.0-CGI-3.37.patch DELETED ---