diff options
Diffstat (limited to 'editors/e93/files/patch-shell.c')
| -rw-r--r-- | editors/e93/files/patch-shell.c | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/editors/e93/files/patch-shell.c b/editors/e93/files/patch-shell.c new file mode 100644 index 000000000000..2e68e44ee923 --- /dev/null +++ b/editors/e93/files/patch-shell.c @@ -0,0 +1,20 @@ +--- shell.c.orig 2013-05-22 09:35:54.000000000 +0200 ++++ shell.c 2013-05-22 09:44:04.000000000 +0200 +@@ -992,7 +992,7 @@ + Tcl_SetVar(interpreter,"SCRIPTPATH",scriptPath,TCL_LEAVE_ERR_MSG); + if(Tcl_EvalFile(interpreter,scriptPath)!=TCL_OK) + { +- SetError("%s:%d:%s",scriptPath,interpreter->errorLine,Tcl_GetStringResult(interpreter)); ++ SetError("%s:%d:%s",scriptPath,Tcl_GetErrorLine(interpreter),Tcl_GetStringResult(interpreter)); + fail=true; + } + } +@@ -1066,7 +1066,7 @@ + } + else + { +- SetError("Failed to Tcl_Init(): %s",tclInterpreter->result); ++ SetError("Failed to Tcl_Init(): %s",Tcl_GetStringResult(tclInterpreter)); + } + UnInitChannels(tclInterpreter); + } |