summaryrefslogtreecommitdiffstats
path: root/macosx/tkMacOSXInit.c
diff options
context:
space:
mode:
Diffstat (limited to 'macosx/tkMacOSXInit.c')
-rw-r--r--macosx/tkMacOSXInit.c8
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;
}