diff options
author | stanton <stanton> | 1998-07-24 15:46:14 (GMT) |
---|---|---|
committer | stanton <stanton> | 1998-07-24 15:46:14 (GMT) |
commit | 57bf0ee30b28846d7028bcc5530bed2b16958c0f (patch) | |
tree | ea33c06141d5ea73561e265dce9a8f7c3aac61db /unix/tkUnixInit.c | |
parent | 93b922e59dca8bd23dc9213d094b743829af3e53 (diff) | |
download | tk-57bf0ee30b28846d7028bcc5530bed2b16958c0f.zip tk-57bf0ee30b28846d7028bcc5530bed2b16958c0f.tar.gz tk-57bf0ee30b28846d7028bcc5530bed2b16958c0f.tar.bz2 |
eliminated static init for library directory
Diffstat (limited to 'unix/tkUnixInit.c')
-rw-r--r-- | unix/tkUnixInit.c | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/unix/tkUnixInit.c b/unix/tkUnixInit.c index acfd8de..ef6fea0 100644 --- a/unix/tkUnixInit.c +++ b/unix/tkUnixInit.c @@ -21,13 +21,6 @@ */ #include "tkInitScript.h" - -/* - * Default directory in which to look for libraries: - */ - -static char defaultLibraryDir[200] = TK_LIBRARY; - /* *---------------------------------------------------------------------- @@ -51,12 +44,6 @@ int TkpInit(interp) Tcl_Interp *interp; { - char *libDir; - - libDir = Tcl_GetVar(interp, "tk_library", TCL_GLOBAL_ONLY); - if (libDir == NULL) { - Tcl_SetVar(interp, "tk_library", defaultLibraryDir, TCL_GLOBAL_ONLY); - } TkCreateXEventSource(); return Tcl_Eval(interp, initScript); } |