[Tkabber-dev] r1925 - trunk/tkabber

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Thu Feb 18 23:47:23 MSK 2010


Author: sergei
Date: 2010-02-18 23:47:23 +0300 (Thu, 18 Feb 2010)
New Revision: 1925

Modified:
   trunk/tkabber/ChangeLog
   trunk/tkabber/chats.tcl
Log:
	* chats.tcl: If chat window is to be opened with type 'error' change
	  the type to 'chat'. An additional investigation is needed to
	  determine if type 'groupchat' has to be considered in this case.


Modified: trunk/tkabber/ChangeLog
===================================================================
--- trunk/tkabber/ChangeLog	2010-02-17 17:53:33 UTC (rev 1924)
+++ trunk/tkabber/ChangeLog	2010-02-18 20:47:23 UTC (rev 1925)
@@ -1,3 +1,9 @@
+2010-02-18  Sergei Golovan  <sgolovan at nes.ru>
+
+	* chats.tcl: If chat window is to be opened with type 'error' change
+	  the type to 'chat'. An additional investigation is needed to
+	  determine if type 'groupchat' has to be considered in this case.
+
 2010-02-17  Sergei Golovan  <sgolovan at nes.ru>
 
 	* pubsub.tcl: Ignore pubsub notifications in error messages (thanks to

Modified: trunk/tkabber/chats.tcl
===================================================================
--- trunk/tkabber/chats.tcl	2010-02-17 17:53:33 UTC (rev 1924)
+++ trunk/tkabber/chats.tcl	2010-02-18 20:47:23 UTC (rev 1925)
@@ -405,6 +405,15 @@
 	return
     }
 
+    switch -- $type {
+	chat -
+	groupchat { }
+	error {
+	    # TODO: check JID category
+	    set type chat
+	}
+    }
+
     hook::run open_chat_pre_hook $chatid $type
 
     set chats(type,$chatid) $type



More information about the Tkabber-dev mailing list