Remove unused patch

Package-Manager: portage-2.2_rc38/cvs/Linux x86_64

32 files changed, 78 insertions, 507 deletions

diff --git a/dev-perl/BSD-Resource/ChangeLog b/dev-perl/BSD-Resource/ChangeLog
index 031b2a078194..eccb1d3e01da 100644
--- a/dev-perl/BSD-Resource/ChangeLog
+++ b/dev-perl/BSD-Resource/ChangeLog
@@ -1,6 +1,10 @@
 # ChangeLog for dev-perl/BSD-Resource
-# Copyright 2000-2009 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-perl/BSD-Resource/ChangeLog,v 1.33 2009/05/02 12:02:35 tove Exp $
+# Copyright 1999-2009 Gentoo Foundation; Distributed under the GPL v2
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/BSD-Resource/ChangeLog,v 1.34 2009/08/16 09:40:06 tove Exp $
+
+  16 Aug 2009; Torsten Veller <tove@gentoo.org>
+  -files/portage_niceness.patch:
+  Remove unused patch
 
   02 May 2009; Torsten Veller <tove@gentoo.org>
   -BSD-Resource-1.29.02.ebuild:
diff --git a/dev-perl/BSD-Resource/files/portage_niceness.patch b/dev-perl/BSD-Resource/files/portage_niceness.patch
deleted file mode 100644
index c85836c9c09b..000000000000
--- a/dev-perl/BSD-Resource/files/portage_niceness.patch
+++ /dev/null
@@ -1,16 +0,0 @@
---- t/getpriority.t	1997-04-08 02:54:17.000000000 -0400
-+++ t/getpriority.t.new	2005-02-06 07:37:07.092780984 -0500
-@@ -12,6 +12,13 @@
- 
- # AIX without BSD libs has 0..39 priorities, not -20..20.
- $okpriopat = $Config{'osname'} eq 'aix' ? '0|19' : '0';
-+my $priority = 0;
-+if (defined($ENV{'PORTAGE_NICENESS'})) {
-+	$priority = int($ENV{'PORTAGE_NICENESS'})
-+} else {
-+	$priority = 19
-+}
-+$okpriopat = defined($priority) ? "0|$priority" : '0';
- 
- $okpriopat = "^($okpriopat)";
- 
diff --git a/dev-perl/BerkeleyDB/ChangeLog b/dev-perl/BerkeleyDB/ChangeLog
index d074f7a6c34c..c8bef664bd83 100644
--- a/dev-perl/BerkeleyDB/ChangeLog
+++ b/dev-perl/BerkeleyDB/ChangeLog
@@ -1,6 +1,9 @@
 # ChangeLog for dev-perl/BerkeleyDB
 # Copyright 1999-2009 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-perl/BerkeleyDB/ChangeLog,v 1.61 2009/07/23 14:44:49 armin76 Exp $
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/BerkeleyDB/ChangeLog,v 1.62 2009/08/16 09:39:18 tove Exp $
+
+  16 Aug 2009; Torsten Veller <tove@gentoo.org> -files/Gentoo-config.diff:
+  Remove unused patch
 
   23 Jul 2009; Raúl Porcel <armin76@gentoo.org> BerkeleyDB-0.39.ebuild:
   alpha/ia64 stable wrt #278089
diff --git a/dev-perl/BerkeleyDB/files/Gentoo-config.diff b/dev-perl/BerkeleyDB/files/Gentoo-config.diff
deleted file mode 100644
index d779ed09943c..000000000000
--- a/dev-perl/BerkeleyDB/files/Gentoo-config.diff
+++ /dev/null
@@ -1,22 +0,0 @@
---- config.in	2003-09-28 09:46:38.000000000 +0100
-+++ config.new	2003-12-23 22:46:02.000000000 +0000
-@@ -16,7 +16,8 @@
- #INCLUDE	= ./libraries/4.1.12/include
- #INCLUDE	= ./libraries/4.1.24.NC/include
- #INCLUDE	= ./libraries/4.1.25/include
--INCLUDE	= ./libraries/4.2.41/include
-+#INCLUDE	= ./libraries/4.2.41/include
-+INCLUDE		= /usr/include
- 
- # 2. Where is libdb?
- #
-@@ -32,7 +33,8 @@
- #LIB	= ./libraries/4.1.12/lib
- #LIB	= ./libraries/4.1.24.NC/lib
- #LIB	= ./libraries/4.1.25/lib
--LIB	= ./libraries/4.2.41/lib
-+#LIB	= ./libraries/4.2.41/lib
-+LIB	= /usr/lib
- 
- #LIB	= ./libraries/1.85/lib
- 
diff --git a/dev-perl/Crypt-Rijndael/ChangeLog b/dev-perl/Crypt-Rijndael/ChangeLog
index 4c705d7dd0c6..2a1d1e3dcf63 100644
--- a/dev-perl/Crypt-Rijndael/ChangeLog
+++ b/dev-perl/Crypt-Rijndael/ChangeLog
@@ -1,6 +1,10 @@
 # ChangeLog for dev-perl/Crypt-Rijndael
 # Copyright 1999-2009 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-perl/Crypt-Rijndael/ChangeLog,v 1.23 2009/07/02 19:24:51 jer Exp $
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/Crypt-Rijndael/ChangeLog,v 1.24 2009/08/16 09:36:30 tove Exp $
+
+  16 Aug 2009; Torsten Veller <tove@gentoo.org>
+  -files/crypt-rijndael-amd64.patch:
+  Remove unused patch
 
   02 Jul 2009; Jeroen Roovers <jer@gentoo.org> Crypt-Rijndael-1.06.ebuild:
   Stable for HPPA too.
diff --git a/dev-perl/Crypt-Rijndael/files/crypt-rijndael-amd64.patch b/dev-perl/Crypt-Rijndael/files/crypt-rijndael-amd64.patch
deleted file mode 100644
index c9b504b40035..000000000000
--- a/dev-perl/Crypt-Rijndael/files/crypt-rijndael-amd64.patch
+++ /dev/null
@@ -1,12 +0,0 @@
-diff -Naurp Crypt-Rijndael-0.05.orig/rijndael.h Crypt-Rijndael-0.05/rijndael.h
---- Crypt-Rijndael-0.05.orig/rijndael.h	2001-09-17 04:52:05.000000000 -0400
-+++ Crypt-Rijndael-0.05/rijndael.h	2006-06-24 13:35:04.000000000 -0400
-@@ -27,7 +27,7 @@
- 
- #include <stdlib.h>
- 
--typedef unsigned long UINT32;
-+typedef unsigned int UINT32;
- typedef unsigned char UINT8;
- 
- /* Other block sizes and key lengths are possible, but in the context of
diff --git a/dev-perl/Crypt-SSLeay/ChangeLog b/dev-perl/Crypt-SSLeay/ChangeLog
index e90751505599..a2bba8270b46 100644
--- a/dev-perl/Crypt-SSLeay/ChangeLog
+++ b/dev-perl/Crypt-SSLeay/ChangeLog
@@ -1,6 +1,9 @@
 # ChangeLog for dev-perl/Crypt-SSLeay
-# Copyright 2002-2009 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-perl/Crypt-SSLeay/ChangeLog,v 1.65 2009/03/26 12:26:32 armin76 Exp $
+# Copyright 1999-2009 Gentoo Foundation; Distributed under the GPL v2
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/Crypt-SSLeay/ChangeLog,v 1.66 2009/08/16 09:35:23 tove Exp $
+
+  16 Aug 2009; Torsten Veller <tove@gentoo.org> -files/rt-15241.patch:
+  Remove unused patch
 
   26 Mar 2009; Raúl Porcel <armin76@gentoo.org> Crypt-SSLeay-0.57.ebuild:
   m68k love, thanks to kolla for testing
diff --git a/dev-perl/Crypt-SSLeay/files/rt-15241.patch b/dev-perl/Crypt-SSLeay/files/rt-15241.patch
deleted file mode 100644
index d6cb9527b153..000000000000
--- a/dev-perl/Crypt-SSLeay/files/rt-15241.patch
+++ /dev/null
@@ -1,11 +0,0 @@
---- Crypt-SSLeay-0.51.orig/SSLeay.xs	2003-05-28 02:55:02.000000000 -0400
-+++ Crypt-SSLeay-0.51/SSLeay.xs	2006-09-01 16:21:33.000000000 -0400
-@@ -106,6 +106,8 @@
- 	char buf[1024];
-         int rand_bytes_read;
- 
-+	SSL_library_init();
-+
- 	if(!bNotFirstTime) {
-                SSLeay_add_all_algorithms();
-                SSL_load_error_strings();
diff --git a/dev-perl/DBD-Pg/ChangeLog b/dev-perl/DBD-Pg/ChangeLog
index d3eb5de6f986..5196b11265e0 100644
--- a/dev-perl/DBD-Pg/ChangeLog
+++ b/dev-perl/DBD-Pg/ChangeLog
@@ -1,6 +1,10 @@
 # ChangeLog for dev-perl/DBD-Pg
-# Copyright 2002-2009 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-perl/DBD-Pg/ChangeLog,v 1.62 2009/01/20 09:34:40 tove Exp $
+# Copyright 1999-2009 Gentoo Foundation; Distributed under the GPL v2
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/DBD-Pg/ChangeLog,v 1.63 2009/08/16 09:33:32 tove Exp $
+
+  16 Aug 2009; Torsten Veller <tove@gentoo.org>
+  -files/DBD-Pg-1.31-versparse.patch:
+  Remove unused patch
 
   20 Jan 2009; Torsten Veller <tove@gentoo.org> DBD-Pg-2.11.8.ebuild:
   Add version module dependency. Thanks to Guillaume Castagnino for
diff --git a/dev-perl/DBD-Pg/files/DBD-Pg-1.31-versparse.patch b/dev-perl/DBD-Pg/files/DBD-Pg-1.31-versparse.patch
deleted file mode 100644
index de8d9314748b..000000000000
--- a/dev-perl/DBD-Pg/files/DBD-Pg-1.31-versparse.patch
+++ /dev/null
@@ -1,20 +0,0 @@
---- t/lib/App/Info/RDBMS/PostgreSQL.pm.orig	2003-12-21 10:48:09.326376964 -0800
-+++ t/lib/App/Info/RDBMS/PostgreSQL.pm	2003-12-21 10:52:07.168963354 -0800
-@@ -246,14 +246,12 @@
- 
-     # Parse the version number.
-     if ($version) {
--        my ($x, $y, $z) = $version =~ /(\d+)\.(\d+).(\d+)/;
--        if (defined $x and defined $y and defined $z) {
-+        my ($x, $y, $z) = split( /\./, $version );
-+        if (defined $x and defined $y) {
-+					defined( $z ) or $z = 0;
-             @{$self}{qw(version major minor patch)} =
-               ($version, $x, $y, $z);
- 				## Beta/devel/release candidate versions are treated as patch level "0"
--        } elsif ($version =~ /(\d+)\.(\d+)\w+\d+/) {
--            @{$self}{qw(version major minor patch)} =
--              ($version, $1, $2, 0);
-         } else {
-             $self->error("Failed to parse PostgreSQL version parts from " .
-                          "string '$version'");
diff --git a/dev-perl/Devel-Size/ChangeLog b/dev-perl/Devel-Size/ChangeLog
index 3a61d2bf8fe3..2621ef946e67 100644
--- a/dev-perl/Devel-Size/ChangeLog
+++ b/dev-perl/Devel-Size/ChangeLog
@@ -1,6 +1,10 @@
 # ChangeLog for dev-perl/Devel-Size
 # Copyright 1999-2009 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-perl/Devel-Size/ChangeLog,v 1.24 2009/08/15 18:21:41 tcunha Exp $
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/Devel-Size/ChangeLog,v 1.25 2009/08/16 09:32:31 tove Exp $
+
+  16 Aug 2009; Torsten Veller <tove@gentoo.org>
+  -files/Devel-Size-test-fix.patch:
+  Remove unused patch
 
   15 Aug 2009; Tiago Cunha <tcunha@gentoo.org> Devel-Size-0.71.ebuild:
   stable sparc, bug 280496
diff --git a/dev-perl/Devel-Size/files/Devel-Size-test-fix.patch b/dev-perl/Devel-Size/files/Devel-Size-test-fix.patch
deleted file mode 100644
index 56e2321d6078..000000000000
--- a/dev-perl/Devel-Size/files/Devel-Size-test-fix.patch
+++ /dev/null
@@ -1,24 +0,0 @@
-diff -ruN Devel-Size-0.64/t/basic.t Devel-Size-0.64_a/t/basic.t
---- Devel-Size-0.64/t/basic.t	2004-11-27 22:40:31.000000000 +0100
-+++ Devel-Size-0.64_a/t/basic.t	2006-09-09 18:49:12.000000000 +0200
-@@ -24,17 +24,17 @@
- %foo = (a => 1, b => 2);
- 
- my $x = "A string";
--my $y = "A longer string";
-+my $y = "A much much longer string";
- if (size($x) < size($y)) {
-     print "ok 2\n";
- } else {
--    print "not ok 2\n";
-+    print "not ok 2 # " . size($x) . " not < than " . size($y) . "\n";
- }
- 
- if (total_size($x) < total_size($y)) {
-     print "ok 3\n";
- } else {
--    print "not ok 3\n";
-+    print "not ok 3 # " . total_size($x) . " not < than " . total_size($y) . "\n";
- }
- 
- my @x = (1..4);
diff --git a/dev-perl/ExtUtils-F77/ChangeLog b/dev-perl/ExtUtils-F77/ChangeLog
index 04de031caccc..82d430adf3aa 100644
--- a/dev-perl/ExtUtils-F77/ChangeLog
+++ b/dev-perl/ExtUtils-F77/ChangeLog
@@ -1,6 +1,10 @@
 # ChangeLog for dev-perl/ExtUtils-F77
-# Copyright 2002-2008 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-perl/ExtUtils-F77/ChangeLog,v 1.37 2008/09/30 12:47:46 tove Exp $
+# Copyright 1999-2009 Gentoo Foundation; Distributed under the GPL v2
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/ExtUtils-F77/ChangeLog,v 1.38 2009/08/16 09:31:37 tove Exp $
+
+  16 Aug 2009; Torsten Veller <tove@gentoo.org>
+  -files/perl-ExtUtils-F77-1.15-alt-g77.patch:
+  Remove unused patch
 
   30 Sep 2008; Torsten Veller <tove@gentoo.org> -ExtUtils-F77-1.15.ebuild,
   -ExtUtils-F77-1.15-r1.ebuild, ExtUtils-F77-1.16.ebuild:
diff --git a/dev-perl/ExtUtils-F77/files/perl-ExtUtils-F77-1.15-alt-g77.patch b/dev-perl/ExtUtils-F77/files/perl-ExtUtils-F77-1.15-alt-g77.patch
deleted file mode 100644
index 0cd323fe7004..000000000000
--- a/dev-perl/ExtUtils-F77/files/perl-ExtUtils-F77-1.15-alt-g77.patch
+++ /dev/null
@@ -1,50 +0,0 @@
-diff -Naurp ExtUtils-F77-1.15.old/F77.pm ExtUtils-F77-1.15/F77.pm
---- ExtUtils-F77-1.15.old/F77.pm	2005-02-03 10:12:49.000000000 -0500
-+++ ExtUtils-F77-1.15/F77.pm	2007-04-16 12:28:35.000000000 -0400
-@@ -169,31 +169,32 @@ $F77config{Solaris}{DEFAULT} = 'F77';
- 
- ### Generic GNU-77 or F2C system ###
- 
-+$F77config{Generic}{G77}{Compiler} = find_in_path('g77','f77','fort77','gfortran');
- $F77config{Generic}{G77}{Link} = sub {
--    my @libs = ('g2c', 'f2c');
-+foreach my $ext qw(so a) {
-+    my @libs = ('gfortran', 'g2c', 'f2c');
-     my ($dir, $lib, $test);
-     foreach $test (@libs) {
--      $dir = `g77 -print-file-name=lib$test.a`;
-+      $dir = `$F77config{Generic}{G77}{Compiler} -print-file-name=lib$test.$ext`;
-       chomp $dir;
-       # Note that -print-file-name returns just the library name
-       # if it cant be found - make sure that we only accept the
-       # directory if it returns a proper path (or matches a /)
--      if (defined $dir && $dir ne "lib$test.a") {
-+      if (defined $dir && $dir ne "lib$test.$ext") {
-         $lib = $test; # Found an existing library
-         last; 
-       }
-     }
- 
-     if( defined $dir  && defined $lib) {
--        $dir =~ s,/lib$lib.a$,,;
-+        $dir =~ s,/lib$lib.$ext$,,;
-     } else {
-         $dir = "/usr/local/lib";
-         $lib = "f2c";
-     }    
-     return( "-L$dir -L/usr/lib -l$lib -lm" );
--};
-+}};
- $F77config{Generic}{G77}{Trail_} = 1;
--$F77config{Generic}{G77}{Compiler} = find_in_path('g77','f77','fort77');
- $F77config{Generic}{G77}{Cflags} = '-O';
- $F77config{Generic}{DEFAULT} = 'G77';
- $F77config{Generic}{F2c}     = $F77config{Generic}{G77};
-@@ -219,6 +220,7 @@ $F77config{Cygwin}{DEFAULT}	= 'G77';
- $F77config{Linux}{G77}     = $F77config{Generic}{G77};
- $F77config{Linux}{F2c}     = $F77config{Generic}{G77};
- $F77config{Linux}{DEFAULT} = 'G77';
-+$F77config{Linux}{G77}{Cflags} = $Config{optimize};
- 
- ### DEC OSF/1 ###
- 
diff --git a/dev-perl/File-MimeInfo/ChangeLog b/dev-perl/File-MimeInfo/ChangeLog
index 80e9a4f9c385..7bbf1af4b1df 100644
--- a/dev-perl/File-MimeInfo/ChangeLog
+++ b/dev-perl/File-MimeInfo/ChangeLog
@@ -1,6 +1,10 @@
 # ChangeLog for dev-perl/File-MimeInfo
 # Copyright 1999-2009 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-perl/File-MimeInfo/ChangeLog,v 1.47 2009/07/06 20:49:59 jer Exp $
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/File-MimeInfo/ChangeLog,v 1.48 2009/08/16 09:31:02 tove Exp $
+
+  16 Aug 2009; Torsten Veller <tove@gentoo.org> -files/mimeinfo.patch,
+  -files/test01.patch:
+  Remove unused patch
 
   06 Jul 2009; Jeroen Roovers <jer@gentoo.org> File-MimeInfo-0.15.ebuild:
   Stable for HPPA too.
diff --git a/dev-perl/File-MimeInfo/files/mimeinfo.patch b/dev-perl/File-MimeInfo/files/mimeinfo.patch
deleted file mode 100644
index 50f7917476e4..000000000000
--- a/dev-perl/File-MimeInfo/files/mimeinfo.patch
+++ /dev/null
@@ -1,19 +0,0 @@
---- File-MimeInfo-0.13.orig/MimeInfo.pm	2006-07-09 10:57:47.000000000 -0400
-+++ File-MimeInfo-0.13/MimeInfo.pm	2006-07-09 10:59:12.000000000 -0400
-@@ -116,8 +116,14 @@ sub default {
- 
- 	{
- 		no warnings; # warnings can be thrown when input is neither ascii or utf8
--		$line =~ s/\s//g; # \n and \t are also control chars
--		return 'text/plain' unless $line =~ /[\x00-\x1F\xF7]/;
-+        if ($] < 5.008) {
-+            $line =~ s/([^\0-\x7F])/do {my $o = ord($1); sprintf("%c%c", 0xc0 | ($o >> 6), 0x80 | ($o & 0x3f)) }/ge;
-+        }
-+        else
-+        {
-+            utf8::encode($line)
-+        }
-+        return 'text/plain' unless $line =~ /[\x00-\x1F\xF7]/;
- 	}
- 	print STDERR "> First 10 bytes of the file contain control chars\n" if $DEBUG;
- 	return 'application/octet-stream';
diff --git a/dev-perl/File-MimeInfo/files/test01.patch b/dev-perl/File-MimeInfo/files/test01.patch
deleted file mode 100644
index b5f5ce41ac42..000000000000
--- a/dev-perl/File-MimeInfo/files/test01.patch
+++ /dev/null
@@ -1,8 +0,0 @@
-diff -Naurp File-MimeInfo-0.13/t/default/plain_text File-MimeInfo-0.13.new/t/default/plain_text
---- File-MimeInfo-0.13/t/default/plain_text	2003-07-12 12:39:39.000000000 -0400
-+++ File-MimeInfo-0.13.new/t/default/plain_text	2006-09-06 10:19:44.000000000 -0400
-@@ -1,4 +1 @@
--
- This is a plain text file
--
--
diff --git a/dev-perl/Finance-Quote/ChangeLog b/dev-perl/Finance-Quote/ChangeLog
index cbd7840c4f9f..9d503be205ae 100644
--- a/dev-perl/Finance-Quote/ChangeLog
+++ b/dev-perl/Finance-Quote/ChangeLog
@@ -1,6 +1,10 @@
 # ChangeLog for dev-perl/Finance-Quote
 # Copyright 1999-2009 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-perl/Finance-Quote/ChangeLog,v 1.53 2009/06/03 16:15:08 tove Exp $
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/Finance-Quote/ChangeLog,v 1.54 2009/08/16 09:29:30 tove Exp $
+
+  16 Aug 2009; Torsten Veller <tove@gentoo.org>
+  -files/Finance-Quote-1.08-tase.patch:
+  Remove unused patch
 
   03 Jun 2009; Torsten Veller <tove@gentoo.org> -Finance-Quote-1.13.ebuild:
   Cleanup
diff --git a/dev-perl/Finance-Quote/files/Finance-Quote-1.08-tase.patch b/dev-perl/Finance-Quote/files/Finance-Quote-1.08-tase.patch
deleted file mode 100644
index fd84a04abb0d..000000000000
--- a/dev-perl/Finance-Quote/files/Finance-Quote-1.08-tase.patch
+++ /dev/null
@@ -1,15 +0,0 @@
-diff -ur Finance-Quote-1.08/lib/Finance/Quote/Yahoo/Base.pm Finance-Quote-1.08-tase/lib/Finance/Quote/Yahoo/Base.pm
---- Finance-Quote-1.08/lib/Finance/Quote/Yahoo/Base.pm	2003-07-04 16:00:07.000000000 +0300
-+++ Finance-Quote-1.08-tase/lib/Finance/Quote/Yahoo/Base.pm	2004-06-28 12:09:52.448751880 +0300
-@@ -227,9 +227,9 @@
- 
- 			# Convert prices (when needed). E.G. London sources
- 			# return in pence. We'd like them to return in pounds
--			# (divide by 100).
-+			# (divide by 100). We'll do the same for Tel-Aviv.
- 			if (defined($exchange)) {
--			  if ($exchange eq "L") {
-+			  if ($exchange eq "L" || $exchange eq "TA") {
- 			    foreach my $field ($quoter->default_currency_fields) {
- 			      next unless ($info{$symbol,$field});
- 			      $info{$symbol,$field} =
diff --git a/dev-perl/Gtk2-Ex-PodViewer/ChangeLog b/dev-perl/Gtk2-Ex-PodViewer/ChangeLog
index 608af31f7284..90c1821682d5 100644
--- a/dev-perl/Gtk2-Ex-PodViewer/ChangeLog
+++ b/dev-perl/Gtk2-Ex-PodViewer/ChangeLog
@@ -1,6 +1,10 @@
 # ChangeLog for dev-perl/Gtk2-Ex-PodViewer
-# Copyright 1999-2008 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-perl/Gtk2-Ex-PodViewer/ChangeLog,v 1.26 2008/11/18 15:03:09 tove Exp $
+# Copyright 1999-2009 Gentoo Foundation; Distributed under the GPL v2
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/Gtk2-Ex-PodViewer/ChangeLog,v 1.27 2009/08/16 09:28:43 tove Exp $
+
+  16 Aug 2009; Torsten Veller <tove@gentoo.org>
+  -files/gtk2-ex-podviewer-makefile.patch:
+  Remove unused patch
 
   18 Nov 2008; Torsten Veller <tove@gentoo.org>
   Gtk2-Ex-PodViewer-0.17.ebuild, Gtk2-Ex-PodViewer-0.18.ebuild:
diff --git a/dev-perl/Gtk2-Ex-PodViewer/files/gtk2-ex-podviewer-makefile.patch b/dev-perl/Gtk2-Ex-PodViewer/files/gtk2-ex-podviewer-makefile.patch
deleted file mode 100644
index 881f7fcb5380..000000000000
--- a/dev-perl/Gtk2-Ex-PodViewer/files/gtk2-ex-podviewer-makefile.patch
+++ /dev/null
@@ -1,11 +0,0 @@
---- Gtk2-Ex-PodViewer-0.14/Makefile.PL	2005-11-18 06:12:52.000000000 -0500
-+++ Gtk2-Ex-PodViewer-0.14.new/Makefile.PL	2006-01-22 17:20:47.000000000 -0500
-@@ -22,7 +22,7 @@ WriteMakefile(
-     	'Gtk2'			=> 0,
-     	'Pod::Parser'		=> 0,
-     	'IO::Scalar'		=> 0,
--    	'File::Basename	'	=> 0,
-+    	'File::Basename'	=> 0,
-     	'Locale::gettext'	=> 0,
-     	'Pod::Simple::Search'	=> 0,
-     },
diff --git a/dev-perl/HTTP-Server-Simple/ChangeLog b/dev-perl/HTTP-Server-Simple/ChangeLog
index 0390a7d0a030..39c502b55dc8 100644
--- a/dev-perl/HTTP-Server-Simple/ChangeLog
+++ b/dev-perl/HTTP-Server-Simple/ChangeLog
@@ -1,6 +1,10 @@
 # ChangeLog for dev-perl/HTTP-Server-Simple
 # Copyright 1999-2009 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-perl/HTTP-Server-Simple/ChangeLog,v 1.37 2009/03/13 12:43:05 tove Exp $
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/HTTP-Server-Simple/ChangeLog,v 1.38 2009/08/16 09:27:18 tove Exp $
+
+  16 Aug 2009; Torsten Veller <tove@gentoo.org> -files/0.36-debian.patch,
+  -files/0.37-debian.patch:
+  Remove unused patch
 
   13 Mar 2009; Torsten Veller <tove@gentoo.org>
   -HTTP-Server-Simple-0.36.ebuild, -HTTP-Server-Simple-0.37.ebuild:
diff --git a/dev-perl/HTTP-Server-Simple/files/0.36-debian.patch b/dev-perl/HTTP-Server-Simple/files/0.36-debian.patch
deleted file mode 100644
index fbb7c443d97a..000000000000
--- a/dev-perl/HTTP-Server-Simple/files/0.36-debian.patch
+++ /dev/null
@@ -1,91 +0,0 @@
---- a/t/01live.t
-+++ b/t/01live.t
-@@ -34,11 +34,7 @@ for my $class (@classes) {
- }
- 
- 
--TODO: { 
--    local $TODO = "We don't currently wait for 'server is running' responses from the client";
--    run_server_tests('SlowServer');
--
--}
-+run_server_tests('SlowServer');
- 
- 
- 
-From: Niko Tyni <ntyni@iki.fi>
-Subject: [PATCH] Pipe version: parent waits for the child to say "OK" via a pipe.
-
---- libhttp-server-simple-perl.orig/lib/HTTP/Server/Simple.pm
-+++ libhttp-server-simple-perl/lib/HTTP/Server/Simple.pm
-@@ -6,6 +6,7 @@
- use Socket;
- use Carp;
- use URI::Escape;
-+use IO::Select;
- 
- use vars qw($VERSION $bad_request_doc);
- $VERSION = '0.36';
-@@ -206,15 +207,36 @@
- 
- sub background {
-     my $self  = shift;
-+
-+    # set up a pipe so the child can tell the parent when it's ready
-+    # to accept requests
-+    my ($readfh, $writefh) = FileHandle::pipe;
-+
-     my $child = fork;
-     croak "Can't fork: $!" unless defined($child);
--    return $child if $child;
-+    if ($child) { # parent
-+        my $s = IO::Select->new;
-+        $s->add($readfh);
-+        my $now = time; my $left = 0;
-+        my @ready;
-+        while(not @ready and $left < 5) {
-+            @ready = $s->can_read($left);
-+            $left = time - $now;
-+        }
-+        die("child unresponsive for 5 seconds") if(not @ready);
-+        my $response = <$readfh>;
-+        chomp $response;
-+        die("child is confused: answer '$response' != 'OK'")
-+            if $response ne "OK";
-+        return $child;
-+    }
- 
-     if ( $^O !~ /MSWin32/ ) {
-         require POSIX;
-         POSIX::setsid()
-             or croak "Can't start a new session: $!";
-     }
-+    $self->{_parent_handle} = $writefh;
-     $self->run(@_);
- }
- 
-@@ -263,6 +285,7 @@
- 	$self->after_setup_listener();
-         *{"$pkg\::run"} = $self->_default_run;
-     }
-+    $self->_maybe_tell_parent();
- 
-     local $SIG{HUP} = sub { $SERVER_SHOULD_RUN = 0; };
- 
-@@ -400,6 +423,16 @@
-     }
- }
- 
-+sub _maybe_tell_parent {
-+    # inform the parent process that we're ready, if applicable
-+    my $self = shift;
-+    my $handle = $self->{_parent_handle};
-+    return if !$handle;
-+    print $handle "OK\n";
-+    close $handle;
-+    delete $self->{_parent_handle};
-+}
-+
- =head2 stdio_handle [FILEHANDLE]
- 
- When called with an argument, sets the socket to the server to that arg.
diff --git a/dev-perl/HTTP-Server-Simple/files/0.37-debian.patch b/dev-perl/HTTP-Server-Simple/files/0.37-debian.patch
deleted file mode 100644
index 65e6dfa3d135..000000000000
--- a/dev-perl/HTTP-Server-Simple/files/0.37-debian.patch
+++ /dev/null
@@ -1,76 +0,0 @@
-From: Niko Tyni <ntyni@iki.fi>
-Subject: [PATCH] Pipe version: parent waits for the child to say "OK" via a pipe.
-
---- a/lib/HTTP/Server/Simple.pm
-+++ b/lib/HTTP/Server/Simple.pm
-@@ -6,6 +6,7 @@
- use Socket;
- use Carp;
- use URI::Escape;
-+use IO::Select;
- 
- use vars qw($VERSION $bad_request_doc);
- $VERSION = '0.36';
-@@ -206,15 +207,36 @@
- 
- sub background {
-     my $self  = shift;
-+
-+    # set up a pipe so the child can tell the parent when it's ready
-+    # to accept requests
-+    my ($readfh, $writefh) = FileHandle::pipe;
-+
-     my $child = fork;
-     croak "Can't fork: $!" unless defined($child);
--    return $child if $child;
-+    if ($child) { # parent
-+        my $s = IO::Select->new;
-+        $s->add($readfh);
-+        my $now = time; my $left = 0;
-+        my @ready;
-+        while(not @ready and $left < 5) {
-+            @ready = $s->can_read($left);
-+            $left = time - $now;
-+        }
-+        die("child unresponsive for 5 seconds") if(not @ready);
-+        my $response = <$readfh>;
-+        chomp $response;
-+        die("child is confused: answer '$response' != 'OK'")
-+            if $response ne "OK";
-+        return $child;
-+    }
- 
-     if ( $^O !~ /MSWin32/ ) {
-         require POSIX;
-         POSIX::setsid()
-             or croak "Can't start a new session: $!";
-     }
-+    $self->{_parent_handle} = $writefh;
-     $self->run(@_);
- }
- 
-@@ -263,6 +285,7 @@
- 	$self->after_setup_listener();
-         *{"$pkg\::run"} = $self->_default_run;
-     }
-+    $self->_maybe_tell_parent();
- 
-     local $SIG{HUP} = sub { $SERVER_SHOULD_RUN = 0; };
- 
-@@ -400,6 +423,16 @@
-     }
- }
- 
-+sub _maybe_tell_parent {
-+    # inform the parent process that we're ready, if applicable
-+    my $self = shift;
-+    my $handle = $self->{_parent_handle};
-+    return if !$handle;
-+    print $handle "OK\n";
-+    close $handle;
-+    delete $self->{_parent_handle};
-+}
-+
- =head2 stdio_handle [FILEHANDLE]
- 
- When called with an argument, sets the socket to the server to that arg.
diff --git a/dev-perl/MIME-Lite/ChangeLog b/dev-perl/MIME-Lite/ChangeLog
index 139c410aae86..c30676a59d9c 100644
--- a/dev-perl/MIME-Lite/ChangeLog
+++ b/dev-perl/MIME-Lite/ChangeLog
@@ -1,6 +1,10 @@
 # ChangeLog for dev-perl/MIME-Lite
-# Copyright 2002-2009 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-perl/MIME-Lite/ChangeLog,v 1.22 2009/03/13 12:49:01 tove Exp $
+# Copyright 1999-2009 Gentoo Foundation; Distributed under the GPL v2
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/MIME-Lite/ChangeLog,v 1.23 2009/08/16 09:25:39 tove Exp $
+
+  16 Aug 2009; Torsten Veller <tove@gentoo.org>
+  -files/3.021-no_sendmail.patch:
+  Remove unused patch
 
   13 Mar 2009; Torsten Veller <tove@gentoo.org> -MIME-Lite-3.021.ebuild,
   -MIME-Lite-3.023.ebuild:
diff --git a/dev-perl/MIME-Lite/files/3.021-no_sendmail.patch b/dev-perl/MIME-Lite/files/3.021-no_sendmail.patch
deleted file mode 100644
index 3294e7239c4e..000000000000
--- a/dev-perl/MIME-Lite/files/3.021-no_sendmail.patch
+++ /dev/null
@@ -1,26 +0,0 @@
---- a/lib/MIME/Lite.pm
-+++ b/lib/MIME/Lite.pm
-@@ -401,13 +401,13 @@ if ( $^O =~ /win32/i ) {
-         }
-     }
-     unless (-x $SENDMAIL) {
--        Carp::croak "can't find an executable sendmail"
-+        undef $SENDMAIL;
-     }
- }
- 
- ### Our sending facilities:
- my %SenderArgs = (
--  sendmail  => ["$SENDMAIL -t -oi -oem"],
-+  sendmail  => [$SENDMAIL ? "$SENDMAIL -t -oi -oem" : undef],
-   smtp      => [],
-   sub       => [],
- );
-@@ -2666,6 +2666,7 @@ sub send_by_sendmail {
-     if ( @_ == 1 and !ref $_[0] ) {
-         ### Use the given command...
-         my $sendmailcmd = shift @_;
-+        Carp::croak "No sendmail command available" unless $sendmailcmd;
- 
-         ### Do it:
-         local *SENDMAIL;
diff --git a/dev-perl/MP3-Tag/ChangeLog b/dev-perl/MP3-Tag/ChangeLog
index 4b1c2e671e24..37cb84239e81 100644
--- a/dev-perl/MP3-Tag/ChangeLog
+++ b/dev-perl/MP3-Tag/ChangeLog
@@ -1,6 +1,10 @@
 # ChangeLog for dev-perl/MP3-Tag
 # Copyright 1999-2009 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-perl/MP3-Tag/ChangeLog,v 1.33 2009/06/03 16:01:55 tove Exp $
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/MP3-Tag/ChangeLog,v 1.34 2009/08/16 09:24:25 tove Exp $
+
+  16 Aug 2009; Torsten Veller <tove@gentoo.org>
+  -files/MP3-Tag-0.94-makefile.patch:
+  Remove unused patch
 
   03 Jun 2009; Torsten Veller <tove@gentoo.org> -MP3-Tag-0.9714.ebuild:
   Cleanup
diff --git a/dev-perl/MP3-Tag/files/MP3-Tag-0.94-makefile.patch b/dev-perl/MP3-Tag/files/MP3-Tag-0.94-makefile.patch
deleted file mode 100644
index 68e489ca74a0..000000000000
--- a/dev-perl/MP3-Tag/files/MP3-Tag-0.94-makefile.patch
+++ /dev/null
@@ -1,14 +0,0 @@
---- Makefile.PL.old	2005-12-15 08:37:36.000000000 +0900
-+++ Makefile.PL	2005-12-15 08:37:47.000000000 +0900
-@@ -12,11 +12,3 @@
-     'PL_FILES'          => {'data_pod.PL'=>'ID3v2-Data.pod'},
-     'clean'             => {FILES => 'ID3v2-Data.pod'},
- );
--
--# Tell MakeMaker about manifying ID3v2-Data.pod
--package MY;
--sub manifypods {
--    my $self = shift;
--    $self->{MAN3PODS}->{'ID3v2-Data.pod'} = '$(INST_MAN3DIR)/MP3::Tag::ID3v2-Data.$(MAN3EXT)';
--    $self->SUPER::manifypods(@_);
--}
diff --git a/dev-perl/Net-CUPS/ChangeLog b/dev-perl/Net-CUPS/ChangeLog
index cf7750b855b9..bf1d809d99f2 100644
--- a/dev-perl/Net-CUPS/ChangeLog
+++ b/dev-perl/Net-CUPS/ChangeLog
@@ -1,6 +1,10 @@
 # ChangeLog for dev-perl/Net-CUPS
 # Copyright 1999-2009 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-perl/Net-CUPS/ChangeLog,v 1.29 2009/08/15 13:34:01 tove Exp $
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/Net-CUPS/ChangeLog,v 1.30 2009/08/16 09:23:06 tove Exp $
+
+  16 Aug 2009; Torsten Veller <tove@gentoo.org>
+  -files/CUPS_FOO_DEVICE.patch:
+  Remove unused patch
 
 *Net-CUPS-0.60 (15 Aug 2009)
 
diff --git a/dev-perl/Net-CUPS/files/CUPS_FOO_DEVICE.patch b/dev-perl/Net-CUPS/files/CUPS_FOO_DEVICE.patch
deleted file mode 100644
index d2933ab9985b..000000000000
--- a/dev-perl/Net-CUPS/files/CUPS_FOO_DEVICE.patch
+++ /dev/null
@@ -1,60 +0,0 @@
-diff -ru Net-CUPS-0.41-orig/Protocol/Protocol_constant_c.inc Net-CUPS-0.41/Protocol/Protocol_constant_c.inc
---- Net-CUPS-0.41-orig/Protocol/Protocol_constant_c.inc	2006-08-06 21:12:26.000000000 -0400
-+++ Net-CUPS-0.41/Protocol/Protocol_constant_c.inc	2006-08-06 21:16:49.000000000 -0400
-@@ -1096,15 +1096,6 @@
-     }
-     break;
-   case '_':
--    if (memEQ(name, "CUPS_ADD_DEVICE", 15)) {
--    /*                       ^             */
--
--      *iv_return = CUPS_ADD_DEVICE;
--      return PERL_constant_ISIV;
--
--      
--
--    }
-     if (memEQ(name, "HTTP_MAX_BUFFER", 15)) {
-     /*                       ^             */
- 
-@@ -1706,15 +1697,6 @@
-     }
-     break;
-   case '_':
--    if (memEQ(name, "CUPS_DELETE_DEVICE", 18)) {
--    /*                          ^             */
--
--      *iv_return = CUPS_DELETE_DEVICE;
--      return PERL_constant_ISIV;
--
--      
--
--    }
-     if (memEQ(name, "HTTP_ENCODE_LENGTH", 18)) {
-     /*                          ^             */
- 
-@@ -3153,8 +3135,8 @@
- use ExtUtils::Constant qw (constant_types C_constant XS_constant);
- 
- my $types = {map {($_, 1)} qw(IV)};
--my @names = (qw(CUPS_ACCEPT_JOBS CUPS_ADD_CLASS CUPS_ADD_DEVICE
--	       CUPS_ADD_PRINTER CUPS_DELETE_CLASS CUPS_DELETE_DEVICE
-+my @names = (qw(CUPS_ACCEPT_JOBS CUPS_ADD_CLASS
-+	       CUPS_ADD_PRINTER CUPS_DELETE_CLASS
- 	       CUPS_DELETE_PRINTER CUPS_GET_CLASSES CUPS_GET_DEFAULT
- 	       CUPS_GET_DEVICES CUPS_GET_PPDS CUPS_GET_PRINTERS CUPS_MOVE_JOB
- 	       CUPS_REJECT_JOBS CUPS_SET_DEFAULT HTTP_0_9 HTTP_1_0 HTTP_1_1
-diff -ru Net-CUPS-0.41-orig/Protocol/Protocol.pm Net-CUPS-0.41/Protocol/Protocol.pm
---- Net-CUPS-0.41-orig/Protocol/Protocol.pm	2006-08-06 21:12:26.000000000 -0400
-+++ Net-CUPS-0.41/Protocol/Protocol.pm	2006-08-06 21:13:40.000000000 -0400
-@@ -20,10 +20,8 @@
- our @EXPORT = qw(
- 					CUPS_ACCEPT_JOBS 
- 					CUPS_ADD_CLASS 
--					CUPS_ADD_DEVICE
- 					CUPS_ADD_PRINTER 
- 					CUPS_DELETE_CLASS 
--					CUPS_DELETE_DEVICE
- 					CUPS_DELETE_PRINTER 
- 					CUPS_GET_CLASSES 
- 					CUPS_GET_DEFAULT
diff --git a/dev-perl/Sub-Uplevel/ChangeLog b/dev-perl/Sub-Uplevel/ChangeLog
index 49aafd725f84..b368d5dc87e4 100644
--- a/dev-perl/Sub-Uplevel/ChangeLog
+++ b/dev-perl/Sub-Uplevel/ChangeLog
@@ -1,6 +1,9 @@
 # ChangeLog for dev-perl/Sub-Uplevel
 # Copyright 1999-2009 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-perl/Sub-Uplevel/ChangeLog,v 1.60 2009/07/16 09:19:02 tove Exp $
+# $Header: /var/cvsroot/gentoo-x86/dev-perl/Sub-Uplevel/ChangeLog,v 1.61 2009/08/16 09:22:08 tove Exp $
+
+  16 Aug 2009; Torsten Veller <tove@gentoo.org> -files/uplevel.patch:
+  Remove unused patch
 
   16 Jul 2009; Torsten Veller <tove@gentoo.org> -Sub-Uplevel-0.16.ebuild,
   -Sub-Uplevel-0.19.01.ebuild:
diff --git a/dev-perl/Sub-Uplevel/files/uplevel.patch b/dev-perl/Sub-Uplevel/files/uplevel.patch
deleted file mode 100644
index e6ad3d48ce9f..000000000000
--- a/dev-perl/Sub-Uplevel/files/uplevel.patch
+++ /dev/null
@@ -1,11 +0,0 @@
---- lib/Sub/Uplevel.pm.orig	2006-03-18 19:33:47.000000000 -0500
-+++ lib/Sub/Uplevel.pm	2006-03-18 19:35:03.000000000 -0500
-@@ -120,7 +120,7 @@ before or after Sub::Uplevel::uplevel().
-         # Yes, we need a C style for loop here since $height changes
-         for( my $up = 1;  $up <= $height + 1;  $up++ ) {
-             my @caller = CORE::caller($up);
--            if( $caller[0] eq __PACKAGE__ ) {
-+		if( defined $caller[0] && $caller[0] eq __PACKAGE__ ) {
-                 $height++;
-                 $height += $Up_Frames unless $saw_uplevel;
-                 $saw_uplevel = 1;