diff options
author | nijtmans@users.sourceforge.net <jan.nijtmans> | 2013-01-14 13:48:03 (GMT) |
---|---|---|
committer | nijtmans@users.sourceforge.net <jan.nijtmans> | 2013-01-14 13:48:03 (GMT) |
commit | 470b18932fcf80ea1ea043e9016dd1fc3b54d209 (patch) | |
tree | 94a7466233e7a73007acc61a138d2a1b04aafeca /unix | |
parent | 8ac85a8d2088329248e166b810e497956a012f9a (diff) | |
download | tk-470b18932fcf80ea1ea043e9016dd1fc3b54d209.zip tk-470b18932fcf80ea1ea043e9016dd1fc3b54d209.tar.gz tk-470b18932fcf80ea1ea043e9016dd1fc3b54d209.tar.bz2 |
Replace various functions calls, for functions which are small wrappers around other functions, to call the wrapped function directly.
Diffstat (limited to 'unix')
-rw-r--r-- | unix/tkUnixInit.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/unix/tkUnixInit.c b/unix/tkUnixInit.c index 494c227..b0aa2fa 100644 --- a/unix/tkUnixInit.c +++ b/unix/tkUnixInit.c @@ -69,7 +69,7 @@ TkpGetAppName( { const char *p, *name; - name = Tcl_GetVar(interp, "argv0", TCL_GLOBAL_ONLY); + name = Tcl_GetVar2(interp, "argv0", NULL, TCL_GLOBAL_ONLY); if ((name == NULL) || (*name == 0)) { name = "tk"; } else { @@ -144,7 +144,7 @@ GetLibraryPath( "com.tcltk.tklibrary", TK_FRAMEWORK_VERSION, 0, PATH_MAX, tkLibPath); if (tkLibPath[0] != '\0') { - Tcl_SetVar(interp, "tk_library", tkLibPath, TCL_GLOBAL_ONLY); + Tcl_SetVar2(interp, "tk_library", NULL, tkLibPath, TCL_GLOBAL_ONLY); } return foundInFramework; #else |