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

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Sat Feb 15 09:50:05 MSK 2014


Author: sergei
Date: 2014-02-15 09:50:05 +0400 (Sat, 15 Feb 2014)
New Revision: 2145

Modified:
   trunk/tkabber/ChangeLog
   trunk/tkabber/plugins/roster/conferences.tcl
Log:
	* plugins/roster/conferences.tcl: Fixed processing autojoin attribute
	  (thanks to Vitaly Takmazov).


Modified: trunk/tkabber/ChangeLog
===================================================================
--- trunk/tkabber/ChangeLog	2014-02-14 09:21:36 UTC (rev 2144)
+++ trunk/tkabber/ChangeLog	2014-02-15 05:50:05 UTC (rev 2145)
@@ -1,3 +1,8 @@
+2014-02-15  Sergei Golovan  <sgolovan at nes.ru>
+
+	* plugins/roster/conferences.tcl: Fixed processing autojoin attribute
+	  (thanks to Vitaly Takmazov).
+
 2014-02-14  Sergei Golovan  <sgolovan at nes.ru>
 
 	* doc/tkabber.html, doc/tkabber.xml, README: Added changes for the

Modified: trunk/tkabber/plugins/roster/conferences.tcl
===================================================================
--- trunk/tkabber/plugins/roster/conferences.tcl	2014-02-14 09:21:36 UTC (rev 2144)
+++ trunk/tkabber/plugins/roster/conferences.tcl	2014-02-15 05:50:05 UTC (rev 2145)
@@ -879,7 +879,7 @@
     set g [$tf getframe]
 
     set egra_name $bookmarks($xlib,name,$jid)
-    set egra_autojoin $bookmarks($xlib,autojoin,$jid)
+    set egra_autojoin [string is true -strict $bookmarks($xlib,autojoin,$jid)]
     if {[info exists bookmarks($xlib,nick,$jid)]} {
         set egra_nick $bookmarks($xlib,nick,$jid)
     } else {



More information about the Tkabber-dev mailing list