diff options
Diffstat (limited to 'tests/unixInit.test')
| -rw-r--r-- | tests/unixInit.test | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/tests/unixInit.test b/tests/unixInit.test index 7d85d02..54af8ab 100644 --- a/tests/unixInit.test +++ b/tests/unixInit.test @@ -10,7 +10,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: unixInit.test,v 1.24 2001/09/06 21:05:56 dgp Exp $ +# RCS: @(#) $Id: unixInit.test,v 1.25 2001/10/10 20:06:46 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest @@ -321,7 +321,8 @@ test unixInit-6.1 {Tcl_SourceRCFile} {emptyTest unixOnly} { if {[info exists oldlibrary]} { set env(TCL_LIBRARY) $oldlibrary } -catch {unset env(LANG); set env(LANG) $oldlang} +catch {unset env(LANG)} +catch {set env(LANG) $oldlang} ::tcltest::cleanupTests return |