diff options
Diffstat (limited to 'macosx/tkMacOSXInit.c')
-rw-r--r-- | macosx/tkMacOSXInit.c | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/macosx/tkMacOSXInit.c b/macosx/tkMacOSXInit.c index 3a212c4..447619f 100644 --- a/macosx/tkMacOSXInit.c +++ b/macosx/tkMacOSXInit.c @@ -382,6 +382,14 @@ TkpInit( Tcl_CreateObjCommand(interp, "::tk::mac::iconBitmap", TkMacOSXIconBitmapObjCmd, NULL, NULL); + /* + * Workaround for 3efbe4a397; console not accepting keyboard input on 10.14 + * if displayed before main window. This places console in background and it + * accepts input after being raised. + */ + + while (Tcl_DoOneEvent(TCL_IDLE_EVENTS)) {} + return TCL_OK; } |