diff options
author | hobbs <hobbs> | 2000-02-10 08:55:14 (GMT) |
---|---|---|
committer | hobbs <hobbs> | 2000-02-10 08:55:14 (GMT) |
commit | dd33cec55f8d2792c7b628594c4f0f2d4df7f669 (patch) | |
tree | 096ac7fd2b5cc84fae1c4869d6fbbf4e5848c4d2 /tests | |
parent | 4541ee11ae166c9c275bd5162a5cf79839415b93 (diff) | |
download | tcl-dd33cec55f8d2792c7b628594c4f0f2d4df7f669.zip tcl-dd33cec55f8d2792c7b628594c4f0f2d4df7f669.tar.gz tcl-dd33cec55f8d2792c7b628594c4f0f2d4df7f669.tar.bz2 |
* unix/README:
* unix/Makefile.in (dist): removed porting.notes and porting.old
from distribution and CVS. The information was very outdated. Now
refer to http://dev.scriptics.com/services/support/platforms.html
* tests/unixInit.test: fixed japanese LANG encoding test [Bug: 3549]
* unix/configure.in:
* unix/tcl.m4: correct CFLAG_WARNING setting,
fixed gcc config for AIX,
added -export-dynamic to LDFLAGS for FreeBSD-3+ [Bug: 2998]
* win/tclWinLoad.c (TclpLoadFile): improved error message for load
failures, could perhaps be even more intelligent.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/unixInit.test | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/tests/unixInit.test b/tests/unixInit.test index 77a6bb4..7007ae7 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.11 1999/10/19 18:08:44 jenn Exp $ +# RCS: @(#) $Id: unixInit.test,v 1.12 2000/02/10 08:55:22 hobbs Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest @@ -164,6 +164,8 @@ test unixInit-3.1 {TclpSetInitialEncodings} {unixOnly installedTcl} { } {iso8859-1} test unixInit-3.2 {TclpSetInitialEncodings} {unixOnly installedTcl} { set env(LANG) japanese + catch {set oldlc_all $env(LC_ALL)} + set env(LC_ALL) japanese set f [open "|[list $::tcltest::tcltest]" w+] fconfigure $f -buffering none @@ -171,6 +173,8 @@ test unixInit-3.2 {TclpSetInitialEncodings} {unixOnly installedTcl} { set enc [gets $f] close $f unset env(LANG) + unset env(LC_ALL) + catch {set env(LC_ALL) $oldlc_all} switch $tcl_platform(os) { HP-UX {set expectedEncoding shiftjis} |