summaryrefslogtreecommitdiff
path: root/recipes/perl/perl-5.10.1/perl-dynloader.patch
diff options
context:
space:
mode:
authorRoman I Khimov <khimov@altell.ru>2010-03-04 14:56:21 +0300
committerRoman I Khimov <khimov@altell.ru>2010-03-24 00:45:25 +0300
commit652b665d0b6a7f7a71405ee4568a487ffc516fa8 (patch)
tree9cc1fca12ceda15e5ec5e6c31ac38c6fc7d1f98d /recipes/perl/perl-5.10.1/perl-dynloader.patch
parent5ae979b0ab285bc06fdd51c133379e91bea7de34 (diff)
perl: add version 5.10.1
Brings perl up to date. Biggest packaging change - make use of Debian patchset as whole. OE used lots of Debian patches anyway and the overall setup is very similar. So instead of picking and messing with individual patches it's far more easier to just use Debian's diff.gz as a whole. Added with masked preference, since it needs more testing. Currently it was only compiled and ran on i686. Signed-off-by: Roman I Khimov <khimov@altell.ru>
Diffstat (limited to 'recipes/perl/perl-5.10.1/perl-dynloader.patch')
-rw-r--r--recipes/perl/perl-5.10.1/perl-dynloader.patch23
1 files changed, 23 insertions, 0 deletions
diff --git a/recipes/perl/perl-5.10.1/perl-dynloader.patch b/recipes/perl/perl-5.10.1/perl-dynloader.patch
new file mode 100644
index 0000000000..e2dc774d5e
--- /dev/null
+++ b/recipes/perl/perl-5.10.1/perl-dynloader.patch
@@ -0,0 +1,23 @@
+Allow the location that .so files are searched for for dynamic
+loading to be changed via an environment variable. This is to allow
+us to load .so's from the host system while building for the target
+system.
+
+--- perl-5.8.8/ext/DynaLoader/XSLoader_pm.PL 2007/04/20 09:03:08 1.1
++++ perl-5.8.8/ext/DynaLoader/XSLoader_pm.PL 2007/04/20 09:41:28
+@@ -65,6 +65,15 @@
+ print OUT <<'EOT';
+ my $modpname = join('/',@modparts);
+ my $modlibname = (caller())[1];
++ # OE: Allow env to form dynamic loader to look in a different place
++ # This is so it finds the host .so files, not the targets
++ if (defined $ENV{PERLHOSTLIB})
++ {
++ my $hostlib = $ENV{PERLHOSTLIB};
++ print STDERR "*** Module name IN: $modlibname\n";
++ $modlibname =~ s#(?<!/)(\.\./)*lib/#$hostlib#g;
++ print STDERR "*** Module name OUT: $modlibname\n";
++ }
+ my $c = @modparts;
+ $modlibname =~ s,[\\/][^\\/]+$,, while $c--; # Q&D basename
+ my $file = "$modlibname/auto/$modpname/$modfname.$dl_dlext";