#1068 test suite failure in unixInit due to locale definition prob

[Anonymous]

OriginalBugID: 3549 Bug
Version: 8.2.2
SubmitDate: '1999-11-11'
LastModified: '2000-02-09'
Severity: LOW
Status: Released
Submitter: techsupp
ChangedBy: hobbs
OS: Solaris
FixedDate: '2000-02-09'
FixedInVersion: 8.3
ClosedDate: '2000-10-25'

Name:

Don Porter

Comments:

If the environment variables LC_ALL or LC_CTYPE are set, they

take precedence over LANG. This causes the test to fail since

the child shell never sees that the desired locale is "japanese".

ObservedBehavior:

$ make test

...

==== unixInit-3.2 TclpSetInitialEncodings FAILED

==== Contents of test case:

---- Result was:

1

---- Result should have been:

0

==== unixInit-3.2 FAILED

DesiredBehavior:

all tests pass

Patch:

*** unixInit.test Tue Nov 9 13:05:00 1999

--- unixInit.test.new Tue Nov 9 13:03:47 1999

***************

*** 162,175 ****

set enc

} {iso8859-1}

test unixInit-3.2 {TclpSetInitialEncodings} {unixOnly installedTcl} {

! set env(LANG) japanese

set f [open "|[list $::tcltest::tcltest]" w+]

fconfigure $f -buffering none

puts $f {puts [encoding system]; exit}

set enc [gets $f]

close $f

! unset env(LANG)

switch $tcl_platform(os) {

HP-UX {set expectedEncoding shiftjis}

--- 162,175 ----

set enc

} {iso8859-1}

test unixInit-3.2 {TclpSetInitialEncodings} {unixOnly installedTcl} {

! set env(LC_ALL) japanese

set f [open "|[list $::tcltest::tcltest]" w+]

fconfigure $f -buffering none

puts $f {puts [encoding system]; exit}

set enc [gets $f]

close $f

! unset env(LC_ALL)

switch $tcl_platform(os) {

HP-UX {set expectedEncoding shiftjis}

PatchFiles:

tests/unixInit.test

Fixed by setting LC_ALL in addition to LANG (and resetting it
to the original).
-- 02/09/2000 hobbs