@@ -143,10 +143,18 @@ "set f [open setup.tcl]\n" "set s [read $f]\n" "close $f\n" "}\n" "uplevel #0 $s\n" +#if defined(KIT_INCLUDES_TK) && defined(KIT_TK_VERSION) +# ifndef _WIN32 + "package ifneeded Tk " KIT_TK_VERSION " {\n" + "load {} Tk\n" + "package provide Tk " KIT_TK_VERSION "\n" + "}\n" +# endif +#endif #ifdef _WIN32 "catch {load {} dde}\n" "catch {load {} registry}\n" #endif /* _WIN32 */ "return 0\n"