diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-14 13:48:03 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-14 13:48:03 (GMT) |
commit | 0b9e60051d8b56808f7674686838055b264485f1 (patch) | |
tree | 94a7466233e7a73007acc61a138d2a1b04aafeca /generic/tkMain.c | |
parent | 5da102f8bd2f7296a1786f951e0aedf27941ccb5 (diff) | |
download | tk-0b9e60051d8b56808f7674686838055b264485f1.zip tk-0b9e60051d8b56808f7674686838055b264485f1.tar.gz tk-0b9e60051d8b56808f7674686838055b264485f1.tar.bz2 |
Replace various functions calls, for functions which are small wrappers around other functions, to call the wrapped function directly.
Diffstat (limited to 'generic/tkMain.c')
-rw-r--r-- | generic/tkMain.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tkMain.c b/generic/tkMain.c index 4d532df..6129548 100644 --- a/generic/tkMain.c +++ b/generic/tkMain.c @@ -335,7 +335,7 @@ Tk_MainEx( */ Tcl_AddErrorInfo(interp, ""); - TkpDisplayWarning(Tcl_GetVar(interp, "errorInfo", + TkpDisplayWarning(Tcl_GetVar2(interp, "errorInfo", NULL, TCL_GLOBAL_ONLY), "Error in startup script"); Tcl_DeleteInterp(interp); Tcl_Exit(1); |