diff options
Diffstat (limited to 'Modules/tkappinit.c')
| -rw-r--r-- | Modules/tkappinit.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Modules/tkappinit.c b/Modules/tkappinit.c index 392269b..c57f0e7 100644 --- a/Modules/tkappinit.c +++ b/Modules/tkappinit.c @@ -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; |