Patch by Dieter Maurer to make things work for Tcl/Tk 8.1. This
simply moves the call to Tk_MainWindow() after the Tcl/Tk initialization calls. The patch is unconditional, it works with earlier and later versions as well.
This commit is contained in:
parent
6b26a06037
commit
e168c65603
|
@ -21,13 +21,13 @@ Tcl_AppInit(interp)
|
|||
{
|
||||
Tk_Window main;
|
||||
|
||||
main = Tk_MainWindow(interp);
|
||||
|
||||
if (Tcl_Init (interp) == TCL_ERROR)
|
||||
return TCL_ERROR;
|
||||
if (Tk_Init (interp) == TCL_ERROR)
|
||||
return TCL_ERROR;
|
||||
|
||||
main = Tk_MainWindow(interp);
|
||||
|
||||
#ifdef WITH_MOREBUTTONS
|
||||
{
|
||||
extern Tcl_CmdProc studButtonCmd;
|
||||
|
|
Loading…
Reference in New Issue