[Tkabber-dev] r1591 - trunk/tkabber

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Wed Oct 29 21:56:20 MSK 2008


Author: sergei
Date: 2008-10-29 21:56:19 +0300 (Wed, 29 Oct 2008)
New Revision: 1591

Modified:
   trunk/tkabber/ChangeLog
   trunk/tkabber/login.tcl
   trunk/tkabber/presence.tcl
Log:
	* login.tcl, presence.tcl: Fixed resetting user status if all Tkabber
	  connections are closed.


Modified: trunk/tkabber/ChangeLog
===================================================================
--- trunk/tkabber/ChangeLog	2008-10-28 15:01:38 UTC (rev 1590)
+++ trunk/tkabber/ChangeLog	2008-10-29 18:56:19 UTC (rev 1591)
@@ -1,3 +1,8 @@
+2008-10-29  Sergei Golovan  <sgolovan at nes.ru>
+
+	* login.tcl, presence.tcl: Fixed resetting user status if all Tkabber
+	  connections are closed.
+
 2008-10-28  Sergei Golovan  <sgolovan at nes.ru>
 
 	* Makefile: Fixed the list of directories to install.

Modified: trunk/tkabber/login.tcl
===================================================================
--- trunk/tkabber/login.tcl	2008-10-28 15:01:38 UTC (rev 1590)
+++ trunk/tkabber/login.tcl	2008-10-29 18:56:19 UTC (rev 1591)
@@ -741,7 +741,6 @@
 
 # TODO
 proc disconnected {xlib} {
-    global curuserstatus userstatusdesc
     global login_after_id
 
     set jid [::xmpp::jid::normalize [connection_requested_jid $xlib]]

Modified: trunk/tkabber/presence.tcl
===================================================================
--- trunk/tkabber/presence.tcl	2008-10-28 15:01:38 UTC (rev 1590)
+++ trunk/tkabber/presence.tcl	2008-10-29 18:56:19 UTC (rev 1591)
@@ -553,6 +553,8 @@
 ###############################################################################
 
 proc clear_presence_info {xlib} {
+    global curuserstatus
+    global userstatusdesc
     global presence
 
     array unset presence type,$xlib,*



More information about the Tkabber-dev mailing list