From c527fd1f14c27855a37f2e8ac5346ce8d940ced2 Mon Sep 17 00:00:00 2001 From: Tudor Florea Date: Thu, 16 Oct 2014 03:05:19 +0200 Subject: initial commit for Enea Linux 4.0-140929 Migrated from the internal git server on the daisy-enea-point-release branch Signed-off-by: Tudor Florea --- .../perl/perl-5.14.3/perl-build-in-t-dir.patch | 42 ++++++++++++++++++++++ 1 file changed, 42 insertions(+) create mode 100644 meta/recipes-devtools/perl/perl-5.14.3/perl-build-in-t-dir.patch (limited to 'meta/recipes-devtools/perl/perl-5.14.3/perl-build-in-t-dir.patch') diff --git a/meta/recipes-devtools/perl/perl-5.14.3/perl-build-in-t-dir.patch b/meta/recipes-devtools/perl/perl-5.14.3/perl-build-in-t-dir.patch new file mode 100644 index 0000000000..16064ede92 --- /dev/null +++ b/meta/recipes-devtools/perl/perl-5.14.3/perl-build-in-t-dir.patch @@ -0,0 +1,42 @@ +Upstream-Status:Pending + +Perl cannot cross build in a path containing a directory that has the +name of "t". As an example, you can make the perl build fail with +"mkdir -p /tmp/build/t", go to the directory, unpack the sources, +configure and cross build. + +You get an error like the following: + pod/buildtoc: no pods at pod/buildtoc line 305. + make[1]: *** [pod/perltoc.pod] Error 255 + +The fix is to strip off the top directory that you are building in and +then execute all the same logic as before against the path relative to +the build directory. + +Signed-off-by: Jason Wessel +--- + pod/buildtoc | 4 +++- + 1 file changed, 3 insertions(+), 1 deletion(-) + +--- a/pod/buildtoc ++++ b/pod/buildtoc +@@ -274,8 +274,10 @@ if ($Build{toc}) { + find \&getpods => abs_from_top('lib/'); + + sub getpods { ++ my $Top = $FindBin::Bin; + if (/\.p(od|m)$/) { + my $file = $File::Find::name; ++ $file =~ s!^$Top!!; + return if $file =~ qr!/lib/Pod/Functions.pm\z!; # Used only by pod itself + return if $file =~ m!(?:^|/)t/!; + return if $file =~ m!lib/Attribute/Handlers/demo/!; +@@ -283,7 +285,7 @@ if ($Build{toc}) { + return if $file =~ m!lib/Math/BigInt/t/!; + return if $file =~ m!/Devel/PPPort/[Hh]arness|lib/Devel/Harness!i; + return if $file =~ m!XS/(?:APItest|Typemap)!; +- my $pod = $file; ++ my $pod = $file = $File::Find::name; + return if $pod =~ s/pm$/pod/ && -e $pod; + unless (open my $f, '<', $_) { + warn "$0: bogus <$file>: $!"; -- cgit v1.2.3-54-g00ecf