[Tkabber-dev] r1580 - in trunk/tkabber-plugins: . floatingcontact

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Fri Oct 24 22:42:08 MSD 2008


Author: sergei
Date: 2008-10-24 22:42:08 +0400 (Fri, 24 Oct 2008)
New Revision: 1580

Modified:
   trunk/tkabber-plugins/ChangeLog
   trunk/tkabber-plugins/floatingcontact/floatingcontact.tcl
Log:
	* floatingcontact/floatingcontact.tcl: Use normalized JID for storing
	  floating contacts properties.


Modified: trunk/tkabber-plugins/ChangeLog
===================================================================
--- trunk/tkabber-plugins/ChangeLog	2008-10-24 16:49:49 UTC (rev 1579)
+++ trunk/tkabber-plugins/ChangeLog	2008-10-24 18:42:08 UTC (rev 1580)
@@ -2,6 +2,9 @@
 
 	* tkabber-khim/tkabber-khim.tcl: Fixed settind option type.
 
+	* floatingcontact/floatingcontact.tcl: Use normalized JID for storing
+	  floating contacts properties.
+
 2008-10-23  Sergei Golovan <sgolovan at nes.ru>
 
 	* floatingcontact/floatingcontact.tcl: Fixed saving floating windows

Modified: trunk/tkabber-plugins/floatingcontact/floatingcontact.tcl
===================================================================
--- trunk/tkabber-plugins/floatingcontact/floatingcontact.tcl	2008-10-24 16:49:49 UTC (rev 1579)
+++ trunk/tkabber-plugins/floatingcontact/floatingcontact.tcl	2008-10-24 18:42:08 UTC (rev 1580)
@@ -24,7 +24,7 @@
     variable float_y
 
     array set fl $floating_jids_list
-    set bjid [connection_bare_jid $xlib]
+    set bjid [::xmpp::jid::normalize [connection_bare_jid $xlib]]
 
     if {![info exists fl($bjid)]} return
 
@@ -46,7 +46,7 @@
     variable float_floats
 
     array set fl $floating_jids_list
-    set bjid [connection_bare_jid $xlib]
+    set bjid [::xmpp::jid::normalize [connection_bare_jid $xlib]]
 
     set fl($bjid) {}
 



More information about the Tkabber-dev mailing list