# $Id$
# Try setting LANG environmental variable.
set env(LANG) "ja_JP.eucJP"
apachetest::start {} {} {
set testfilename1 include.rvt
::tcltest::test lang-1.1 {"include" with LANG} {
set page [ ::http::geturl "${urlbase}$testfilename1" ]
::http::data $page
} {
Include Test
Include Test
日本語(EUC-JP Japanese text)
}
set testfilename1 parse.rvt
::tcltest::test parse-1.1 {Parse command} {
set page [ ::http::geturl "${urlbase}$testfilename1" ]
::http::data $page
} {
Parse Test
Parse Test
Hello, World
? ? ? ? ? ? - El Burro Sabe M?s Que T?!
日本語(EUC-JP Japanese text)
}
}
unset env(LANG)