[Tkabber-dev] r1698 - in trunk/tkabber-plugins: . whiteboard

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Sat Feb 28 20:16:05 MSK 2009


Author: sergei
Date: 2009-02-28 20:16:05 +0300 (Sat, 28 Feb 2009)
New Revision: 1698

Modified:
   trunk/tkabber-plugins/ChangeLog
   trunk/tkabber-plugins/whiteboard/whiteboard.tcl
Log:
	* whiteboard/whiteboard.tcl: Adapted to a change in output format in
	  ::xmpp::delay::parse procedure.


Modified: trunk/tkabber-plugins/ChangeLog
===================================================================
--- trunk/tkabber-plugins/ChangeLog	2009-02-28 17:15:35 UTC (rev 1697)
+++ trunk/tkabber-plugins/ChangeLog	2009-02-28 17:16:05 UTC (rev 1698)
@@ -1,3 +1,8 @@
+2009-02-28  Sergei Golovan <sgolovan at nes.ru>
+
+	* whiteboard/whiteboard.tcl: Adapted to a change in output format in
+	  ::xmpp::delay::parse procedure.
+
 2009-02-27  Sergei Golovan <sgolovan at nes.ru>
 
 	* debug/debug.tcl: Added calling procedure name to debug info. Also,

Modified: trunk/tkabber-plugins/whiteboard/whiteboard.tcl
===================================================================
--- trunk/tkabber-plugins/whiteboard/whiteboard.tcl	2009-02-28 17:15:35 UTC (rev 1697)
+++ trunk/tkabber-plugins/whiteboard/whiteboard.tcl	2009-02-28 17:16:05 UTC (rev 1698)
@@ -341,7 +341,7 @@
 }
 
 proc wb::handle_wb {chatid from type body x} {
-    set seconds [::xmpp::delay::parse $x]
+    set seconds [::xmpp::xml::getAttr [::xmpp::delay::parse $x] seconds]
 
     foreach xelem $x {
 	::xmpp::xml::split $xelem tag xmlns attrs cdata subels



More information about the Tkabber-dev mailing list