36 lines
994 B
Diff
36 lines
994 B
Diff
From 2e0ce5d27e70defd66ace0661af7c24daae34f8b Mon Sep 17 00:00:00 2001
|
|
From: Richard Purdie <richard.purdie@linuxfoundation.org>
|
|
Date: Sat, 19 Jan 2013 23:49:24 +0000
|
|
Subject: [PATCH 7/8] perl: Add dyanloader build hack
|
|
|
|
Hack the dynamic module loader so that we use native modules since we can't load
|
|
the target ones.
|
|
|
|
Upstream-Status: Inappropriate
|
|
|
|
RP
|
|
2013/01/13
|
|
|
|
---
|
|
ext/DynaLoader/DynaLoader_pm.PL | 4 ++++
|
|
1 file changed, 4 insertions(+)
|
|
|
|
diff --git a/ext/DynaLoader/DynaLoader_pm.PL b/ext/DynaLoader/DynaLoader_pm.PL
|
|
index e828f35..4021559 100644
|
|
--- a/ext/DynaLoader/DynaLoader_pm.PL
|
|
+++ b/ext/DynaLoader/DynaLoader_pm.PL
|
|
@@ -343,6 +343,10 @@ sub bootstrap {
|
|
foreach (@INC) {
|
|
<<$^O-eq-VMS>>chop($_ = VMS::Filespec::unixpath($_));<</$^O-eq-VMS>>
|
|
$dir = "$_/auto/$modpname";
|
|
+
|
|
+ if (defined $ENV{PERL_LIB} and defined $ENV{PERLHOSTLIB}) {
|
|
+ $dir =~ s/$ENV{PERL_LIB}/$ENV{PERLHOSTLIB}/g;
|
|
+ }
|
|
|
|
next unless -d $dir; # skip over uninteresting directories
|
|
|
|
--
|
|
2.1.4
|
|
|