# $Id$ set testfilename1 parse.rvt ::tcltest::test parse-1.1 {Parse command} { set page [ ::http::geturl "${urlbase}$testfilename1" ] ::http::data $page } {
ÆüËܸì(EUC-JP Japanese text)
} set testfilename2 parsestring.rvt ::tcltest::test parse-1.2 {Parse command} { set page [ ::http::geturl "${urlbase}$testfilename2" ] ::http::data $page } {ÆüËܸì(EUC-JP Japanese text)
}