diff options
Diffstat (limited to 'meta/recipes-devtools/perl/perl-5.8.8/09_fix_installperl.patch')
-rw-r--r-- | meta/recipes-devtools/perl/perl-5.8.8/09_fix_installperl.patch | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/meta/recipes-devtools/perl/perl-5.8.8/09_fix_installperl.patch b/meta/recipes-devtools/perl/perl-5.8.8/09_fix_installperl.patch new file mode 100644 index 0000000000..f550537d02 --- /dev/null +++ b/meta/recipes-devtools/perl/perl-5.8.8/09_fix_installperl.patch | |||
@@ -0,0 +1,32 @@ | |||
1 | Correctly identify arch-specific modules in ext/ where the .pm files | ||
2 | are under lib. | ||
3 | |||
4 | Ensure that POSIX/SigAction is kept with the rest of the POSIX module | ||
5 | under archlib. | ||
6 | |||
7 | diff --exclude=debian -Naur perl-5.8.8.orig/installperl perl-5.8.8/installperl | ||
8 | --- perl-5.8.8.orig/installperl 2006-01-29 02:35:28.000000000 +1100 | ||
9 | +++ perl-5.8.8/installperl 2006-05-31 22:54:41.000000000 +1000 | ||
10 | @@ -156,11 +156,8 @@ | ||
11 | if ("$File::Find::dir/$_" =~ m{^ext\b(.*)/([^/]+)\.pm$}) { | ||
12 | my($path, $modname) = ($1,$2); | ||
13 | |||
14 | - # strip trailing component first | ||
15 | - $path =~ s{/[^/]*$}{}; | ||
16 | - | ||
17 | - # strip optional "/lib"; | ||
18 | - $path =~ s{/lib\b}{}; | ||
19 | + # strip to optional "/lib", or remove trailing component | ||
20 | + $path =~ s{.*/lib\b}{} or $path =~ s{/[^/]*$}{}; | ||
21 | |||
22 | # strip any leading / | ||
23 | $path =~ s{^/}{}; | ||
24 | @@ -851,7 +848,7 @@ | ||
25 | } | ||
26 | |||
27 | if (-f $_) { | ||
28 | - if (/\.(?:al|ix)$/ && !($dir =~ m[^auto/(.*)$] && $archpms{$1})) { | ||
29 | + if (/\.(?:al|ix)$/ && !($dir =~ m[^auto/(.*)$])) { | ||
30 | $installlib = $installprivlib; | ||
31 | #We're installing *.al and *.ix files into $installprivlib, | ||
32 | #but we have to delete old *.al and *.ix files from the 5.000 | ||