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 | 50bba11de943e80fd387c0f5a04a67b1d4b17f39 (patch) | |
tree | 94a7466233e7a73007acc61a138d2a1b04aafeca /unix/tkUnixInit.c | |
parent | 0685eee98b78605d4ff2e0dfc76c165c9ae589a4 (diff) | |
download | tk-50bba11de943e80fd387c0f5a04a67b1d4b17f39.zip tk-50bba11de943e80fd387c0f5a04a67b1d4b17f39.tar.gz tk-50bba11de943e80fd387c0f5a04a67b1d4b17f39.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/tkUnixInit.c')
-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 |