diff options
| author | James E Keenan <jkeenan@cpan.org> | 2021-02-11 22:24:17 -0500 |
|---|---|---|
| committer | James E Keenan <jkeenan@cpan.org> | 2021-02-12 09:42:39 -0500 |
| commit | c0a5d55cad17cba1ebafa6f1d280a77189992a3d (patch) | |
| tree | b7541645de6a742158528cf3cd730b462a3cf0fc /t | |
| parent | f7ea639df5857906d08343f7d8315b3a351ca2bc (diff) | |
| download | perl-c0a5d55cad17cba1ebafa6f1d280a77189992a3d.tar.gz | |
Look up 'nm' in %Config
For: https://github.com/Perl/perl5/issues/17864
Diffstat (limited to 't')
| -rw-r--r-- | t/porting/globvar.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/porting/globvar.t b/t/porting/globvar.t index f7e08583f9..3e6d630c43 100644 --- a/t/porting/globvar.t +++ b/t/porting/globvar.t @@ -22,7 +22,7 @@ $skip{PL_hash_rand_bits}= $skip{PL_hash_rand_bits_enabled}= 1; # we can be compi $skip{PL_warn_locale}= 1; # we can be compiled without locales, so skip testing them -my $trial = "nm globals$Config{_o} 2>&1"; +my $trial = "$Config{nm} globals$Config{_o} 2>&1"; my $yes = `$trial`; skip_all("Could not run `$trial`") if $?; @@ -47,7 +47,7 @@ close $fh or die "Problem running makedef.pl"; my %unexported; foreach my $file (map {$_ . $Config{_o}} qw(globals regcomp)) { - open $fh, '-|', 'nm', $file + open $fh, '-|', $Config{nm}, $file or die "Can't run nm $file"; while (<$fh>) { |