diff options
Diffstat (limited to 'meta/packages/perl/perl-5.8.8/64_debian_enc2xs_inc.patch')
-rw-r--r-- | meta/packages/perl/perl-5.8.8/64_debian_enc2xs_inc.patch | 28 |
1 files changed, 0 insertions, 28 deletions
diff --git a/meta/packages/perl/perl-5.8.8/64_debian_enc2xs_inc.patch b/meta/packages/perl/perl-5.8.8/64_debian_enc2xs_inc.patch deleted file mode 100644 index c207a9380..000000000 --- a/meta/packages/perl/perl-5.8.8/64_debian_enc2xs_inc.patch +++ /dev/null @@ -1,28 +0,0 @@ -Tweak enc2xs to handle Debian @INC: ignore missing directories, -follow symlinks (/usr/share/perl/5.8 -> 5.8.4). - -diff -Naur --exclude=debian perl-5.8.8.orig/ext/Encode/bin/enc2xs perl-5.8.8/ext/Encode/bin/enc2xs ---- perl-5.8.8.orig/ext/Encode/bin/enc2xs 2004-09-03 01:53:51.000000000 +1000 -+++ perl-5.8.8/ext/Encode/bin/enc2xs 2006-02-03 00:21:32.000000000 +1100 -@@ -909,10 +909,11 @@ - eval { require File::Find; }; - my (@inc, %e2x_dir); - for my $inc (@INC){ -+ next unless -d $inc; # skip non-existent directories - push @inc, $inc unless $inc eq '.'; #skip current dir - } - File::Find::find( -- sub { -+ { wanted => sub { - my ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size, - $atime,$mtime,$ctime,$blksize,$blocks) - = lstat($_) or return; -@@ -922,7 +923,7 @@ - $e2x_dir{$File::Find::dir} ||= $mtime; - } - return; -- }, @inc); -+ }, follow => 1}, @inc); - warn join("\n", keys %e2x_dir), "\n"; - for my $d (sort {$e2x_dir{$a} <=> $e2x_dir{$b}} keys %e2x_dir){ - $_E2X = $d; |