diff options
author | Ben Elliston <bje@gnu.org> | 2017-08-29 17:10:09 +1000 |
---|---|---|
committer | Ben Elliston <bje@gnu.org> | 2017-08-29 17:10:09 +1000 |
commit | a5d5bd4f3a37f223d8820610950a16d8afeb8d3d (patch) | |
tree | 90261f95ad2c5d1d707ca7ed56df9cd1ecf2688a /testsuite | |
parent | e301ae8ebdd5d07360501b05aa1075242ceef5c5 (diff) | |
download | dejagnu-a5d5bd4f3a37f223d8820610950a16d8afeb8d3d.zip dejagnu-a5d5bd4f3a37f223d8820610950a16d8afeb8d3d.tar.gz dejagnu-a5d5bd4f3a37f223d8820610950a16d8afeb8d3d.tar.bz2 |
Revert these changes:
2016-04-25 Ben Elliston <bje@gnu.org>
* testsuite/runtest.all/utils.test: Remove unsetenv test.
2016-04-24 Ben Elliston <bje@gnu.org>
* lib/utils.exp (unsetenv): Remove proc.
* doc/dejagnu.texi: Update documentation.
* NEWS: Update.
Diffstat (limited to 'testsuite')
-rw-r--r-- | testsuite/runtest.all/utils.test | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/testsuite/runtest.all/utils.test b/testsuite/runtest.all/utils.test index 201280f..de8c809 100644 --- a/testsuite/runtest.all/utils.test +++ b/testsuite/runtest.all/utils.test @@ -88,6 +88,19 @@ if [info exists env(TESTRUN)] { untested "getenv, get an environment variable" } +# Test unsetenv: +# +if [info exists env(TESTRUN)] { + unsetenv TESTRUN + if [info exists env(TESTRUN)] { + fail "unsetenv, unset an environment variable" + } else { + pass "unsetenv, unset an environment variable" + } +} else { + untested "unsetenv, unset an environment variable" +} + # Test 'which' using a relative path. # if {[which ./config.status] != 0} { |