pass LOCPATH environment variable too, might be needed on glibc systems
This commit is contained in:
parent
9e83002841
commit
18199e20fd
9
check.pl
9
check.pl
@ -1,4 +1,4 @@
|
|||||||
# $MirOS: src/bin/mksh/check.pl,v 1.20 2009/03/22 16:59:18 tg Exp $
|
# $MirOS: src/bin/mksh/check.pl,v 1.21 2009/04/07 18:45:19 tg Stab $
|
||||||
# $OpenBSD: th,v 1.13 2006/05/18 21:27:23 miod Exp $
|
# $OpenBSD: th,v 1.13 2006/05/18 21:27:23 miod Exp $
|
||||||
#-
|
#-
|
||||||
# Example test:
|
# Example test:
|
||||||
@ -52,8 +52,8 @@
|
|||||||
# missing, NAME is removed from the
|
# missing, NAME is removed from the
|
||||||
# environment. Programs are run with
|
# environment. Programs are run with
|
||||||
# the following minimal environment:
|
# the following minimal environment:
|
||||||
# HOME, LD_LIBRARY_PATH, LOGNAME,
|
# HOME, LD_LIBRARY_PATH, LOCPATH,
|
||||||
# PATH, SHELL, USER
|
# LOGNAME, PATH, SHELL, USER
|
||||||
# (values taken from the environment of
|
# (values taken from the environment of
|
||||||
# the test harness).
|
# the test harness).
|
||||||
# ENV is set to /nonexistant.
|
# ENV is set to /nonexistant.
|
||||||
@ -234,7 +234,8 @@ $all_tests = @ARGV == 0;
|
|||||||
|
|
||||||
# Set up a very minimal environment
|
# Set up a very minimal environment
|
||||||
%new_env = ();
|
%new_env = ();
|
||||||
foreach $env (('HOME', 'LD_LIBRARY_PATH', 'LOGNAME', 'PATH', 'SHELL', 'USER')) {
|
foreach $env (('HOME', 'LD_LIBRARY_PATH', 'LOCPATH', 'LOGNAME',
|
||||||
|
'PATH', 'SHELL', 'USER')) {
|
||||||
$new_env{$env} = $ENV{$env} if defined $ENV{$env};
|
$new_env{$env} = $ENV{$env} if defined $ENV{$env};
|
||||||
}
|
}
|
||||||
$new_env{'ENV'} = '/nonexistant';
|
$new_env{'ENV'} = '/nonexistant';
|
||||||
|
Loading…
x
Reference in New Issue
Block a user