[Tkabber-dev] r1525 - in trunk/tkabber: . plugins/general

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Fri Oct 17 22:13:17 MSD 2008


Author: sergei
Date: 2008-10-17 22:13:16 +0400 (Fri, 17 Oct 2008)
New Revision: 1525

Modified:
   trunk/tkabber/ChangeLog
   trunk/tkabber/datagathering.tcl
   trunk/tkabber/plugins/general/offline.tcl
Log:
	* datagathering.tcl, plugins/general/offline.tcl: Fixed incorrect
	  variable names.


Modified: trunk/tkabber/ChangeLog
===================================================================
--- trunk/tkabber/ChangeLog	2008-10-17 18:06:12 UTC (rev 1524)
+++ trunk/tkabber/ChangeLog	2008-10-17 18:13:16 UTC (rev 1525)
@@ -24,6 +24,9 @@
 
 	* itemedit.tcl: Fixed bug with widget name containing xlib variable.
 
+	* datagathering.tcl, plugins/general/offline.tcl: Fixed incorrect
+	  variable names.
+
 2008-10-11  Sergei Golovan  <sgolovan at nes.ru>
 
 	* AUTHORS: Fixed authors list.

Modified: trunk/tkabber/datagathering.tcl
===================================================================
--- trunk/tkabber/datagathering.tcl	2008-10-17 18:06:12 UTC (rev 1524)
+++ trunk/tkabber/datagathering.tcl	2008-10-17 18:13:16 UTC (rev 1525)
@@ -386,7 +386,7 @@
 
     foreach item $subels {
 	::xmpp::xml::split $item stag sxmlns sattrs scdata ssubels
-	switch -- $tag1 {
+	switch -- $stag {
 	    required {set required 1}
 	    value {
 		set data(var,$var,$g) $scdata

Modified: trunk/tkabber/plugins/general/offline.tcl
===================================================================
--- trunk/tkabber/plugins/general/offline.tcl	2008-10-17 18:06:12 UTC (rev 1524)
+++ trunk/tkabber/plugins/general/offline.tcl	2008-10-17 18:13:16 UTC (rev 1525)
@@ -93,7 +93,7 @@
     foreach subel $subels {
 	::xmpp::xml::split $subel stag sxmlns sattrs scdata ssubels
 
-	switch -- $tag1 {
+	switch -- $stag {
 	    item {
 		set node     [::xmpp::xml::getAttr $sattrs node]
 		set from     [::xmpp::xml::getAttr $sattrs from]



More information about the Tkabber-dev mailing list