[Tkabber-dev] r1343 - trunk/tkabber

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Thu Jan 3 23:45:12 MSK 2008


Author: sergei
Date: 2008-01-03 23:45:11 +0300 (Thu, 03 Jan 2008)
New Revision: 1343

Modified:
   trunk/tkabber/ChangeLog
   trunk/tkabber/chats.tcl
Log:
	* chats.tcl: Fixed raising tab in case when a user clicks on "Open new
	  conversation" link which appears in chat tab if the other party
	  changes his/her nickname.


Modified: trunk/tkabber/ChangeLog
===================================================================
--- trunk/tkabber/ChangeLog	2007-12-31 14:15:42 UTC (rev 1342)
+++ trunk/tkabber/ChangeLog	2008-01-03 20:45:11 UTC (rev 1343)
@@ -1,3 +1,9 @@
+2008-01-03  Sergei Golovan  <sgolovan at nes.ru>
+
+	* chats.tcl: Fixed raising tab in case when a user clicks on "Open new
+	  conversation" link which appears in chat tab if the other party
+	  changes his/her nickname.
+
 2007-12-31  Sergei Golovan  <sgolovan at nes.ru>
 
 	* ifaceck/iface.tcl, ifacetk/iface.tcl: Added -raise option to add_win

Modified: trunk/tkabber/chats.tcl
===================================================================
--- trunk/tkabber/chats.tcl	2007-12-31 14:15:42 UTC (rev 1342)
+++ trunk/tkabber/chats.tcl	2008-01-03 20:45:11 UTC (rev 1343)
@@ -656,8 +656,6 @@
     set ix [lsearch -exact [::chat::opened] $chatid]
     if {$ix < 0} return
 
-    set new_cid [::chat::chatid $connid $to]
-
     set msg [format [::msgcat::mc \
 	"%s has changed nick to %s."] \
 	$nick $new_nick]
@@ -671,7 +669,7 @@
 	for the new nick of the room occupant"]
     ::plugins::urls::render_url $cw url $tooltip {} \
 	-title [::msgcat::mc "Open new conversation"] \
-	-command [list [namespace current]::open_window $new_cid chat]
+	-command [list [namespace current]::open_to_user $connid $to]
     $cw insert end \n
     $cw config -state disabled
 }



More information about the Tkabber-dev mailing list