Tcl Source Code

Artifact 1b424709dc27adfb9c1f0e17a734bcd84ae2928a:

Attachment "tk_dialog.tcl.patch" to ticket [1216775fff] added by sick_soul 2005-06-08 06:54:04.

---

--- dialog.tcl.old	2005-06-08 01:42:19.000000000 +0200
+++ dialog.tcl	2005-06-08 01:41:46.000000000 +0200
@@ -168,6 +168,8 @@
     wm geom $w +$x+$y
     wm deiconify $w
 
+    tkwait visibility $w
+
     # 7. Set a grab and claim the focus too.
 
     set oldFocus [focus]