SOURCES: perl-5.8.7-CAN-2004-0976.patch - removed instmodsh part f...

[radek]

Author: radek                        Date: Mon Apr  3 11:05:15 2006 GMT
Module: SOURCES                       Tag: HEAD
---- Log message:
- removed instmodsh part for 5.8.8

---- Files affected:
SOURCES:
   perl-5.8.7-CAN-2004-0976.patch (1.1 -> 1.2) 

---- Diffs:

================================================================
Index: SOURCES/perl-5.8.7-CAN-2004-0976.patch
diff -u SOURCES/perl-5.8.7-CAN-2004-0976.patch:1.1 SOURCES/perl-5.8.7-CAN-2004-0976.patch:1.2
--- SOURCES/perl-5.8.7-CAN-2004-0976.patch:1.1	Fri Jan 20 15:08:52 2006
+++ SOURCES/perl-5.8.7-CAN-2004-0976.patch	Mon Apr  3 13:05:09 2006
@@ -98,68 +98,6 @@
  1 while unlink $file, "$file.dir", "$file.pag";
  tryout('GDBM_File', $file, 1);  # Test 1..4
  1 while unlink $file, "$file.dir", "$file.pag";
---- perl-5.8.7/lib/ExtUtils/instmodsh.CAN-2004-0976	2004-01-05 17:34:59.000000000 -0500
-+++ perl-5.8.7/lib/ExtUtils/instmodsh	2005-11-08 12:42:25.000000000 -0500
-@@ -2,6 +2,7 @@
- 
- use strict;
- use IO::File;
-+use File::Temp;
- use ExtUtils::Packlist;
- use ExtUtils::Installed;
- 
-@@ -58,15 +59,14 @@
-       $reply =~ /^t\s*/ and do
-          {
-          my $file = (split(' ', $reply))[1];
--         my $tmp = "/tmp/inst.$$";
--         if (my $fh = IO::File->new($tmp, "w"))
--            {
--            $fh->print(join("\n", $Inst->files($module)));
--            $fh->close();
--            system("tar cvf $file -I $tmp");
--            unlink($tmp);
--            last CASE;
--            }
-+	 my ($fh, $tmp) = File::Temp::tempfile(UNLINK => 1);
-+	 $fh->print(join("\n", $Inst->files($module)));
-+	 $fh->close();
-+	 # This used to use -I which is wrong for GNU tar.
-+	 system("tar cvf $file -T $tmp");
-+	 unlink($tmp);
-+	 last CASE;
-+         }  
-          else { print("Can't open $file: $!\n"); }
-          last CASE;
-          };
---- perl-5.8.7/lib/ExtUtils/MakeMaker.pm.CAN-2004-0976	2004-01-05 17:34:59.000000000 -0500
-+++ perl-5.8.7/lib/ExtUtils/MakeMaker.pm	2005-11-08 13:07:36.000000000 -0500
-@@ -1013,7 +1013,7 @@
- The Makefile to be produced may be altered by adding arguments of the
- form C<KEY=VALUE>. E.g.
- 
--  perl Makefile.PL PREFIX=/tmp/myperl5
-+  perl Makefile.PL PREFIX=~/myperl5
- 
- Other interesting targets in the generated Makefile are
- 
-@@ -1355,13 +1355,13 @@
- 
- This is the root directory into which the code will be installed.  It
- I<prepends itself to the normal prefix>.  For example, if your code
--would normally go into /usr/local/lib/perl you could set DESTDIR=/tmp/
--and installation would go into /tmp/usr/local/lib/perl.
-+would normally go into /usr/local/lib/perl you could set DESTDIR=~/myperl/
-+and installation would go into ~/myperl/usr/local/lib/perl.
- 
- This is primarily of use for people who repackage Perl modules.
- 
- NOTE: Due to the nature of make, it is important that you put the trailing
--slash on your DESTDIR.  "/tmp/" not "/tmp".
-+slash on your DESTDIR.  "~/myperl/" not "~/myperl".
- 
- =item DIR
- 
 --- perl-5.8.7/lib/CGI/Cookie.pm.CAN-2004-0976	2005-05-16 04:41:03.000000000 -0400
 +++ perl-5.8.7/lib/CGI/Cookie.pm	2005-11-08 14:56:15.141710000 -0500
 @@ -407,7 +407,7 @@
================================================================

---- CVS-web:
    http://cvs.pld-linux.org/SOURCES/perl-5.8.7-CAN-2004-0976.patch?r1=1.1&r2=1.2&f=u