diff options
| author | dgp <dgp@users.sourceforge.net> | 2004-12-01 21:58:55 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2004-12-01 21:58:55 (GMT) |
| commit | 7b470edbf5e874d173c860d5296ef3f25f845134 (patch) | |
| tree | 5f56d5d7709b60532bdaeaf6d99ef9ffcabb19bf /generic | |
| parent | b68250712dc55e55851dd4e0950410ab37506665 (diff) | |
| download | tcl-7b470edbf5e874d173c860d5296ef3f25f845134.zip tcl-7b470edbf5e874d173c860d5296ef3f25f845134.tar.gz tcl-7b470edbf5e874d173c860d5296ef3f25f845134.tar.bz2 | |
* generic/tclEncoding.c: Moved TclpSetInitialEncodings()
call from Tcl_FindExecutable() into TclInitEncodingSubsystem().
This is important on Windows where it establishes whether the
"ascii" or "unicode" set of system routines will be used, and
that needs to be done earlier to support filesystem operations.
[Bug 1077005]
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclEncoding.c | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c index c3f53c3..6932301 100644 --- a/generic/tclEncoding.c +++ b/generic/tclEncoding.c @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclEncoding.c,v 1.27 2004/11/30 19:34:47 dgp Exp $ + * RCS: @(#) $Id: tclEncoding.c,v 1.28 2004/12/01 21:58:59 dgp Exp $ */ #include "tclInt.h" @@ -513,7 +513,7 @@ TclInitEncodingSubsystem() Tcl_CreateEncoding(&type); encodingsInitialized = 1; - + TclpSetInitialEncodings(); } /* @@ -1304,7 +1304,6 @@ Tcl_FindExecutable(argv0) * (native). */ { TclInitSubsystems(); - TclpSetInitialEncodings(); TclpFindExecutable(argv0); } |