[Tkabber-dev] r833 - in trunk/tkabber: . plugins/roster

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Fri Dec 22 13:10:17 MSK 2006


Author: sergei
Date: 2006-12-22 13:10:14 +0300 (Fri, 22 Dec 2006)
New Revision: 833

Modified:
   trunk/tkabber/ChangeLog
   trunk/tkabber/plugins/roster/fetch_nicknames.tcl
Log:
	* plugins/roster/fetch_nicknames.tcl: Bugfix (thanks to Irek
	  Chmielowiec).


Modified: trunk/tkabber/ChangeLog
===================================================================
--- trunk/tkabber/ChangeLog	2006-12-22 07:35:15 UTC (rev 832)
+++ trunk/tkabber/ChangeLog	2006-12-22 10:10:14 UTC (rev 833)
@@ -5,6 +5,9 @@
 	  makes it roster label. For services (e.g. ICQ-transport) it
 	  fetches nicknames for all service users.
 
+	* plugins/roster/fetch_nicknames.tcl: Bugfix (thanks to Irek
+	  Chmielowiec).
+
 2006-12-16  Sergei Golovan  <sgolovan at nes.ru>
 
 	* msgs/ru.msg: Bugfix.

Modified: trunk/tkabber/plugins/roster/fetch_nicknames.tcl
===================================================================
--- trunk/tkabber/plugins/roster/fetch_nicknames.tcl	2006-12-22 07:35:15 UTC (rev 832)
+++ trunk/tkabber/plugins/roster/fetch_nicknames.tcl	2006-12-22 10:10:14 UTC (rev 833)
@@ -5,7 +5,7 @@
 
 proc fetch_nickname::service_request {connid service} {
     foreach jid [::roster::get_jids $connid] {
-	if {[node_from_server $jid] == [node_from_server $service]} {
+	if {[server_from_jid $jid] == [server_from_jid $service]} {
 	    user_request $connid $jid
 	}
     }
@@ -55,5 +55,5 @@
 }
 
 hook::add roster_service_popup_menu_hook \
-    [namespace current]::itemedit::prefs_user_menu 73
+    [namespace current]::fetch_nickname::add_service_menu 73
 



More information about the Tkabber-dev mailing list