# This file is part of GNU Rush. 
# Copyright (C) 2016-2024 Sergey Poznyakoff
#
# GNU Rush is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 3, or (at your option)
# any later version.
#
# GNU Rush is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with GNU Rush.  If not, see <http://www.gnu.org/licenses/>.

AT_SETUP([unsetenv])
AT_KEYWORDS([unsetenv])

m4_pushdef([RUSH_ENVIRON],[-i HOME=$PWD USER=$MY_USER LOGIN=$MY_USER])
AT_RUSH_TEST([
rush 2.0
rule
    unsetenv LOGIN
],
[environ],
[command],
[0],
[{
    "environ":[[
        "HOME=$TESTDIR",
        "USER=$MY_USER"
    ]]
}
],
[])

AT_RUSH_TEST([
rush 2.0
rule
    unsetenv LOGIN=$MY_USER
],
[environ],
[command],
[0],
[{
    "environ":[[
        "HOME=$TESTDIR",
        "USER=$MY_USER"
    ]]
}
],
[])
m4_popdef([RUSH_ENVIRON])

m4_pushdef([RUSH_ENVIRON],[-i HOME=$PWD USER=$MY_USER LOGIN=NO_$MY_USER])
AT_RUSH_TEST([
rush 2.0
rule
    unsetenv LOGIN=$MY_USER
],
[environ],
[command],
[0],
[{
    "environ":[[
        "HOME=$TESTDIR",
        "LOGIN=NO_$MY_USER",
        "USER=$MY_USER"
    ]]
}
],
[])
m4_popdef([RUSH_ENVIRON])

m4_pushdef([RUSH_ENVIRON],[-i HOME=$PWD USER=$MY_USER TEST_FOO=foo TEST_BAR=bar])
AT_RUSH_TEST([
rush 2.0
rule
    unsetenv "TEST_*"
],
[environ],
[command],
[0],
[{
    "environ":[[
        "HOME=$TESTDIR",
        "USER=$MY_USER"
    ]]
}
],
[])
m4_popdef([RUSH_ENVIRON])

AT_CLEANUP
