diff options
Diffstat (limited to 'generic/tclMain.c')
| -rw-r--r-- | generic/tclMain.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclMain.c b/generic/tclMain.c index d23cd7b..8b7331f 100644 --- a/generic/tclMain.c +++ b/generic/tclMain.c @@ -286,7 +286,7 @@ Tcl_MainEx( { int i=0; /* argv[i] index */ Tcl_Obj *path, *resultPtr, *argvPtr, *appName; - const char *encodingName = NULL; + const char *encoding = NULL; int code, exitCode = 0; Tcl_MainLoopProc *mainLoopProc; Tcl_Channel chan; @@ -336,7 +336,7 @@ Tcl_MainEx( } } - path = Tcl_GetStartupScript(&encodingName); + path = Tcl_GetStartupScript(&encoding); if (path != NULL) { appName = path; } else if (argv[0]) { @@ -398,10 +398,10 @@ Tcl_MainEx( * again, as the appInitProc might have reset it. */ - path = Tcl_GetStartupScript(&encodingName); + path = Tcl_GetStartupScript(&encoding); if (path != NULL) { Tcl_ResetResult(interp); - code = Tcl_FSEvalFileEx(interp, path, encodingName); + code = Tcl_FSEvalFileEx(interp, path, encoding); if (code != TCL_OK) { chan = Tcl_GetStdChannel(TCL_STDERR); if (chan) { |