[Tkabber-dev] r1315 - in trunk/tkabber: . ifacetk

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Fri Nov 16 19:26:41 MSK 2007


Author: sergei
Date: 2007-11-16 19:26:40 +0300 (Fri, 16 Nov 2007)
New Revision: 1315

Modified:
   trunk/tkabber/ChangeLog
   trunk/tkabber/ifacetk/bwidget_workarounds.tcl
Log:
	* ifacetk/bwidget_workarounds.tcl: Fixed dialog definition if -parent
	  is explicitly empty.


Modified: trunk/tkabber/ChangeLog
===================================================================
--- trunk/tkabber/ChangeLog	2007-11-14 19:47:07 UTC (rev 1314)
+++ trunk/tkabber/ChangeLog	2007-11-16 16:26:40 UTC (rev 1315)
@@ -1,8 +1,14 @@
+2007-11-16  Sergei Golovan  <sgolovan at nes.ru>
+
+	* ifacetk/bwidget_workarounds.tcl: Fixed dialog definition if -parent
+	  is explicitly empty.
+
 2007-11-13  Sergei Golovan  <sgolovan at nes.ru>
 
 	* ifacetk/bwidget_workarounds.tcl: Make dialogs non-transient to their
-	parents if parents aren't viewable. Transient window in this case
-	become unmapped too and grab to it leads to complete application hang.
+	  parents if parents aren't viewable. Transient window in this case
+	  become unmapped too and grab to it leads to complete application
+	  hang.
 
 2007-11-12  Sergei Golovan  <sgolovan at nes.ru>
 

Modified: trunk/tkabber/ifacetk/bwidget_workarounds.tcl
===================================================================
--- trunk/tkabber/ifacetk/bwidget_workarounds.tcl	2007-11-14 19:47:07 UTC (rev 1314)
+++ trunk/tkabber/ifacetk/bwidget_workarounds.tcl	2007-11-16 16:26:40 UTC (rev 1315)
@@ -339,6 +339,9 @@
     }
     # Do not make a dialog window transient if its parent isn't vewable.
     # Otherwise it leads to hang of a whole application.
+    if {$parent == ""} {
+	set parent .
+    }
     if {![winfo viewable [winfo toplevel $parent]] } {
 	set transient 0
     }



More information about the Tkabber-dev mailing list