diff options
Diffstat (limited to 'poky/meta/recipes-devtools/perl/perl/dynaloaderhack.patch')
-rw-r--r-- | poky/meta/recipes-devtools/perl/perl/dynaloaderhack.patch | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/poky/meta/recipes-devtools/perl/perl/dynaloaderhack.patch b/poky/meta/recipes-devtools/perl/perl/dynaloaderhack.patch new file mode 100644 index 000000000..719f07c9c --- /dev/null +++ b/poky/meta/recipes-devtools/perl/perl/dynaloaderhack.patch @@ -0,0 +1,35 @@ +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 + |