[Tkabber-dev] r1861 - in trunk/tkabber-plugins: . floatinglog

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Tue Dec 29 22:29:47 MSK 2009


Author: sergei
Date: 2009-12-29 22:29:47 +0300 (Tue, 29 Dec 2009)
New Revision: 1861

Modified:
   trunk/tkabber-plugins/ChangeLog
   trunk/tkabber-plugins/floatinglog/floatinglog.tcl
Log:
	* floatinglog/floatinglog.tcl: Check if the floatinglog window exists
	  before setting its geometry (thanks to Ruslan Rakhmanin).


Modified: trunk/tkabber-plugins/ChangeLog
===================================================================
--- trunk/tkabber-plugins/ChangeLog	2009-12-29 19:10:34 UTC (rev 1860)
+++ trunk/tkabber-plugins/ChangeLog	2009-12-29 19:29:47 UTC (rev 1861)
@@ -1,3 +1,8 @@
+2009-12-29  Sergei Golovan <sgolovan at nes.ru>
+
+	* floatinglog/floatinglog.tcl: Check if the floatinglog window exists
+	  before setting its geometry (thanks to Ruslan Rakhmanin).
+
 2009-12-25  Sergei Golovan <sgolovan at nes.ru>
 
 	* gmail/gmail.tcl: Got rid of using global NS variable.

Modified: trunk/tkabber-plugins/floatinglog/floatinglog.tcl
===================================================================
--- trunk/tkabber-plugins/floatinglog/floatinglog.tcl	2009-12-29 19:10:34 UTC (rev 1860)
+++ trunk/tkabber-plugins/floatinglog/floatinglog.tcl	2009-12-29 19:29:47 UTC (rev 1861)
@@ -419,6 +419,9 @@
     variable options
     variable winname
 
+    if {![winfo exists $winname]} {
+	return
+    }
     catch {
 	if {[lsearch -exact [wm attributes $winname] -alpha] >= 0} {
 	    wm attributes $winname -alpha [expr $options(alpha) / 100.0]



More information about the Tkabber-dev mailing list