revision 1.13 told lies and was an incomplete commit

d’oh, nobody noticed, as nobody uses icc anyway… but
MirPorts llvm-gcc currently is similarily broken ;-)
This commit is contained in:
tg 2008-12-20 20:21:19 +00:00
parent 858d8e8b5a
commit d363c6a729
1 changed files with 4 additions and 4 deletions

View File

@ -1,4 +1,4 @@
# $MirOS: src/bin/mksh/check.pl,v 1.18 2008/07/14 14:53:23 tg Exp $
# $MirOS: src/bin/mksh/check.pl,v 1.19 2008/12/20 20:21:19 tg Exp $
# $OpenBSD: th,v 1.12 2005/05/28 04:53:47 millert Exp $
#-
# Example test:
@ -52,8 +52,8 @@
# missing, NAME is removed from the
# environment. Programs are run with
# the following minimal environment:
# USER, LOGNAME, HOME,
# LD_LIBRARY_PATH, PATH, SHELL
# HOME, LD_LIBRARY_PATH, LOGNAME,
# PATH, SHELL, USER
# (values taken from the environment of
# the test harness).
# ENV is set to /nonexistant.
@ -234,7 +234,7 @@ $all_tests = @ARGV == 0;
# Set up a very minimal environment
%new_env = ();
foreach $env (('USER', 'LOGNAME', 'HOME', 'PATH', 'SHELL')) {
foreach $env (('HOME', 'LD_LIBRARY_PATH', 'LOGNAME', 'PATH', 'SHELL', 'USER')) {
$new_env{$env} = $ENV{$env} if defined $ENV{$env};
}
$new_env{'ENV'} = '/nonexistant';