summaryrefslogtreecommitdiffstats
path: root/meta/recipes-devtools/perl-sanity/files/0001-Somehow-this-module-breaks-through-the-perl-wrapper-.patch
diff options
context:
space:
mode:
Diffstat (limited to 'meta/recipes-devtools/perl-sanity/files/0001-Somehow-this-module-breaks-through-the-perl-wrapper-.patch')
-rw-r--r--meta/recipes-devtools/perl-sanity/files/0001-Somehow-this-module-breaks-through-the-perl-wrapper-.patch34
1 files changed, 34 insertions, 0 deletions
diff --git a/meta/recipes-devtools/perl-sanity/files/0001-Somehow-this-module-breaks-through-the-perl-wrapper-.patch b/meta/recipes-devtools/perl-sanity/files/0001-Somehow-this-module-breaks-through-the-perl-wrapper-.patch
new file mode 100644
index 0000000000..ed8ec1d416
--- /dev/null
+++ b/meta/recipes-devtools/perl-sanity/files/0001-Somehow-this-module-breaks-through-the-perl-wrapper-.patch
@@ -0,0 +1,34 @@
1From e8e095b9c71c58f8197d6315359446b6b084cb2b Mon Sep 17 00:00:00 2001
2From: Alexander Kanavin <alex.kanavin@gmail.com>
3Date: Tue, 5 Jun 2018 14:58:42 +0300
4Subject: [PATCH] Somehow this module breaks through the perl wrapper and
5 declares perl binary to be 'perl.real'. This patch forces it back to perl.
6
7Upstream-Status: Inappropriate [oe-core specific]
8Signed-off-by: Alexander Kanavin <alex.kanavin@gmail.com>
9---
10 cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm | 4 ++++
11 1 file changed, 4 insertions(+)
12
13diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm
14index 948c476..f537526 100644
15--- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm
16+++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm
17@@ -1110,6 +1110,9 @@ WARNING
18 }
19
20 foreach my $name (@$names){
21+ # Getting MakeMaker.pm use perl wrapper instead of 'perl.real' directly
22+ $name =~ s/perl\.real/perl/ if ($name =~ /perl\.real/);
23+
24 my ($abs, $use_dir);
25 if ($self->file_name_is_absolute($name)) { # /foo/bar
26 $abs = $name;
27@@ -2006,6 +2009,7 @@ sub init_PERL {
28
29 $self->{PERL} ||=
30 $self->find_perl(5.0, \@perls, \@defpath, $Verbose );
31+
32
33 my $perl = $self->{PERL};
34 $perl =~ s/^"//;