rpms/perl/F-9 perl-5.10.0-accessXOK.patch, NONE, 1.1 perl.spec, 1.168, 1.169

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

Author: mmaslano

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

Modified Files:
	perl.spec 
Added Files:
	perl-5.10.0-accessXOK.patch 
Log Message:
- 447371 wrong access permission rt49003


perl-5.10.0-accessXOK.patch:

--- NEW FILE perl-5.10.0-accessXOK.patch ---
diff -up perl-5.10.0/pp_sys.c.crr perl-5.10.0/pp_sys.c
--- perl-5.10.0/pp_sys.c.crr	2007-12-18 11:47:08.000000000 +0100
+++ perl-5.10.0/pp_sys.c	2008-06-11 14:50:12.000000000 +0200
@@ -3002,7 +3002,7 @@ PP(pp_ftrread)
 
     case OP_FTEEXEC:
 #ifdef PERL_EFF_ACCESS
-	access_mode = W_OK;
+	access_mode = X_OK;
 #else
 	use_access = 0;
 #endif


Index: perl.spec
===================================================================
RCS file: /cvs/pkgs/rpms/perl/F-9/perl.spec,v
retrieving revision 1.168
retrieving revision 1.169
diff -u -r1.168 -r1.169
--- perl.spec	26 May 2008 15:24:22 -0000	1.168
+++ perl.spec	11 Jun 2008 13:35:14 -0000	1.169
@@ -16,7 +16,7 @@
 
 Name:           perl
 Version:        %{perl_version}
-Release:        24%{?dist}
+Release:        25%{?dist}
 Epoch:          %{perl_epoch}
 Summary:        The Perl programming language
 Group:          Development/Languages
@@ -76,7 +76,7 @@
 
 # Problem with assertion - add upstream patch
 Patch15:	perl-5.10.0-bz448392.patch
-
+Patch16:	perl-5.10.0-accessXOK.patch
 BuildRoot:      %{_tmppath}/%{name}-%{perl_version}-%{release}-root-%(%{__id_u} -n)
 BuildRequires:  tcsh, dos2unix, man, groff
 BuildRequires:  gdbm-devel, db4-devel, zlib-devel
@@ -799,6 +799,7 @@
 %patch13 -p1
 %patch14 -p1
 %patch15 -p1
+%patch16 -p1
 
 #
 # Candidates for doc recoding (need case by case review):
@@ -1021,6 +1022,7 @@
 perl -x patchlevel.h 'Fedora Patch13: Upgrade Module::CoreList to 2.14'
 perl -x patchlevel.h 'Fedora Patch14: Upgrade CGI to 3.37'
 perl -x patchlevel.h 'Fedora Patch15: Adopt upstream commit for assertion'
+perl -x patchlevel.h 'Fedora Patch16: Access permission - rt49003'
 
 %clean
 rm -rf $RPM_BUILD_ROOT
@@ -1626,6 +1628,9 @@
 
 # Old changelog entries are preserved in CVS.
 %changelog
+* Wed Jun 11 2008 Marcela Maslanova <mmaslano at redhat.com> 4:5.10.0-25
+- 447371 wrong access permission rt49003
+
 * Mon May 26 2008 Marcela Maslanova <mmaslano at redhat.com> 4:5.10.0-24
 - 448392 upstream fix for assertion