[Tkabber-dev] r2042 - trunk/tkabber

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Tue Dec 31 10:34:00 MSK 2013


Author: sergei
Date: 2013-12-31 10:33:59 +0400 (Tue, 31 Dec 2013)
New Revision: 2042

Modified:
   trunk/tkabber/ChangeLog
   trunk/tkabber/login.tcl
Log:
	* login.tcl: Define the autologin variable in Customize interface.


Modified: trunk/tkabber/ChangeLog
===================================================================
--- trunk/tkabber/ChangeLog	2013-12-30 20:57:28 UTC (rev 2041)
+++ trunk/tkabber/ChangeLog	2013-12-31 06:33:59 UTC (rev 2042)
@@ -1,3 +1,7 @@
+2013-12-31  Sergei Golovan  <sgolovan at nes.ru>
+
+	* login.tcl: Define the autologin variable in Customize interface.
+
 2013-12-30  Sergei Golovan  <sgolovan at nes.ru>
 
 	* README, doc/tkabber.html, doc/tkabber.xml: Added section which

Modified: trunk/tkabber/login.tcl
===================================================================
--- trunk/tkabber/login.tcl	2013-12-30 20:57:28 UTC (rev 2041)
+++ trunk/tkabber/login.tcl	2013-12-31 06:33:59 UTC (rev 2042)
@@ -46,6 +46,14 @@
     [::msgcat::mc "Login options."] \
     -group Tkabber
 
+custom::defvar autologin 0 \
+    [::msgcat::mc "Whether to automatically login to server or\
+		   show the login window."] \
+    -group Login -type options \
+    -values [list 0  [::msgcat::mc "Show the login window"] \
+		  1  [::msgcat::mc "Autologin to the server"] \
+		  -1 [::msgcat::mc "Don't show the login window"]]
+
 custom::defvar loginconf(user) "" \
     [::msgcat::mc "User name."] \
     -group Login -type string



More information about the Tkabber-dev mailing list