Tclkit doesn't correctly set encoding system in non=english locales
on startup.
------------begin patch-----------
--- tclUnixInit.c Thu May 12 20:18:51 2005
+++ tclUnixInit.c.new Thu May 12 20:14:03 2005
@@ -485,7 +485,8 @@
void
TclpSetInitialEncodings()
{
- if (libraryPathEncodingFixed == 0) {
+
+/* if (libraryPathEncodingFixed == 0) { */
CONST char *encoding = NULL;
int i, setSysEncCode = TCL_ERROR;
Tcl_Obj *pathPtr;
@@ -647,6 +648,7 @@
* dependent behavior.
*/
+ if (libraryPathEncodingFixed == 0) {
setlocale(LC_NUMERIC, "C");
/*
------------end patch-----------
So, this function works only once. Not acceptable to tclkit, so
system encoding is never set correctly.
After the patch --- it works.
tclkit
% encoding system
koi8-r
On windows (and at all), there is a bug it boot.tcl in tclkit:
vfs::filesystem unmount $noe
Example in russian locale on Win98 (cp1251):
noe: D:/TCLKIT/�������/TCLKIT-WIN32-NEWEST.EXE
::vfs::filesystem info:
d:/tclkit/�������/tclkit-win32-newest.exe
Case differs, so it says: "no such mount" and crashes (on Win98 only).
Replaced with:
vfs::filesystem unmount [::vfs::filesystem info]
tclkit-win32-newest.exe with added encodings by tkunicode.html on the site works ok.