[Tkabber-dev] r153 - trunk/plugins/openhistory

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Mon Oct 20 22:31:50 MSD 2008


Author: asv
Date: 2008-10-20 22:31:50 +0400 (Mon, 20 Oct 2008)
New Revision: 153

Modified:
   trunk/plugins/openhistory/openhistory.tcl
Log:
migrating to a new tkabber's API.


Modified: trunk/plugins/openhistory/openhistory.tcl
===================================================================
--- trunk/plugins/openhistory/openhistory.tcl	2008-10-20 16:59:24 UTC (rev 152)
+++ trunk/plugins/openhistory/openhistory.tcl	2008-10-20 18:31:50 UTC (rev 153)
@@ -14,10 +14,10 @@
     } else return
 
     set user [lindex [split $body] 1]
-    set connid [chat::get_connid $chatid]
+    set connid [chat::get_xlib $chatid]
 
     if {![string length $user]} {
-        set jid [node_and_server_from_jid [chat::get_jid $chatid]]
+        set jid [xmpp::jid::stripResource [chat::get_jid $chatid]]
 
         ::logger::show_log $jid -connection $connid
         return stop
@@ -45,7 +45,7 @@
         set suffix $plugins::completion::options(suffix)
 
         set jidcomps {}
-        set connid [chat::get_connid $chatid]
+        set connid [chat::get_xlib $chatid]
 
         foreach jid [roster::get_jids $connid] {
             if {[roster::itemconfig $connid $jid -isuser]} {



More information about the Tkabber-dev mailing list