summaryrefslogtreecommitdiff
path: root/cpan/ExtUtils-MakeMaker/t/INST.t
diff options
context:
space:
mode:
Diffstat (limited to 'cpan/ExtUtils-MakeMaker/t/INST.t')
-rw-r--r--cpan/ExtUtils-MakeMaker/t/INST.t10
1 files changed, 7 insertions, 3 deletions
diff --git a/cpan/ExtUtils-MakeMaker/t/INST.t b/cpan/ExtUtils-MakeMaker/t/INST.t
index 4b0b926dbc..91058bb74d 100644
--- a/cpan/ExtUtils-MakeMaker/t/INST.t
+++ b/cpan/ExtUtils-MakeMaker/t/INST.t
@@ -100,9 +100,13 @@ is( $mm->{INST_BIN}, File::Spec->catdir($Curdir, 'blib', 'bin'),
is( keys %{$mm->{CHILDREN}}, 1 );
my($child_pack) = keys %{$mm->{CHILDREN}};
my $c_mm = $mm->{CHILDREN}{$child_pack};
-is( $c_mm->{INST_ARCHLIB},
- $c_mm->{PERL_CORE} ? $c_mm->{PERL_ARCHLIB}
- : File::Spec->catdir($Updir, 'blib', 'arch'),
+# Android passes ARCHLIB through ->rel2abs, so in case the same
+# path is presented in two different ways, we need to
+# pass it through Cwd::realpath.
+my $normalize = $^O =~ /android/ ? \&Cwd::realpath : sub {shift};
+is( $normalize->($c_mm->{INST_ARCHLIB}),
+ $normalize->($c_mm->{PERL_CORE} ? $c_mm->{PERL_ARCHLIB}
+ : File::Spec->catdir($Updir, 'blib', 'arch')),
'CHILD INST_ARCHLIB');
is( $c_mm->{INST_BIN}, File::Spec->catdir($Updir, 'blib', 'bin'),
'CHILD INST_BIN' );