]> git.pld-linux.org Git - packages/perl.git/blobdiff - perl-ExtUtils-MakeMaker-write-permissions.patch
- document why no asm-generic on ppc*
[packages/perl.git] / perl-ExtUtils-MakeMaker-write-permissions.patch
index 6fa5a9e742c007fa23590b2b2c20928006c28b1d..fded3974d75bfd69b4c7177d5d5da1b07c828234 100644 (file)
@@ -1,21 +1,20 @@
-diff -Nur ExtUtils-MakeMaker-6.30.orig/lib/ExtUtils/Install.pm ExtUtils-MakeMaker-6.30.write-permissions/lib/ExtUtils/Install.pm
---- ExtUtils-MakeMaker-6.30.orig/lib/ExtUtils/Install.pm       2005-03-22 04:30:24.000000000 +0000
-+++ ExtUtils-MakeMaker-6.30.write-permissions/lib/ExtUtils/Install.pm  2006-10-30 16:14:28.000000000 +0000
-@@ -180,7 +180,7 @@
-               print "Installing $targetfile\n";
-               utime($atime,$mtime + $Is_VMS,$targetfile) unless $nonono>1;
-               print "utime($atime,$mtime,$targetfile)\n" if $verbose>1;
--              $mode = 0444 | ( $mode & 0111 ? 0111 : 0 );
-+              $mode = 0644 | ( $mode & 0111 ? 0111 : 0 );
-               chmod $mode, $targetfile;
-               print "chmod($mode, $targetfile)\n" if $verbose>1;
-           } else {
-@@ -451,7 +451,7 @@
-       }
-       my($mode,$atime,$mtime) = (stat $from)[2,8,9];
-       utime($atime,$mtime+$Is_VMS,$to);
--      chmod(0444 | ( $mode & 0111 ? 0111 : 0 ),$to);
-+      chmod(0644 | ( $mode & 0111 ? 0111 : 0 ),$to);
-       next unless $from =~ /\.pm$/;
-       _autosplit($to,$autodir);
+--- ExtUtils-MakeMaker-6.42/inc/ExtUtils/Install.pm.orig       2007-11-17 04:52:56.000000000 +0000
++++ ExtUtils-MakeMaker-6.42/inc/ExtUtils/Install.pm    2008-02-11 22:33:25.966893319 +0000
+@@ -666,7 +666,7 @@
+             utime($atime,$mtime + $Is_VMS,$targetfile) unless $nonono>1;
+-            $mode = 0444 | ( $mode & 0111 ? 0111 : 0 );
++            $mode = 0644 | ( $mode & 0111 ? 0111 : 0 );
+             $mode = $mode | 0222
+                 if $realtarget ne $targetfile;
+             _chmod( $mode, $targetfile, $verbose );
+@@ -1018,7 +1018,7 @@
+         }
+         my($mode,$atime,$mtime) = (stat $from)[2,8,9];
+         utime($atime,$mtime+$Is_VMS,$to);
+-        _chmod(0444 | ( $mode & 0111 ? 0111 : 0 ),$to);
++        _chmod(0644 | ( $mode & 0111 ? 0111 : 0 ),$to);
+         next unless $from =~ /\.pm$/;
+         _autosplit($to,$autodir);
      }
This page took 0.026243 seconds and 4 git commands to generate.