[Tkabber-dev] r1000 - in trunk/tkabber: . plugins/chat

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Sun Mar 4 13:12:02 MSK 2007


Author: sergei
Date: 2007-03-04 13:12:00 +0300 (Sun, 04 Mar 2007)
New Revision: 1000

Modified:
   trunk/tkabber/ChangeLog
   trunk/tkabber/plugins/chat/logger.tcl
Log:
	* plugins/chat/logger.tcl: Fixed bug with showing empty history.


Modified: trunk/tkabber/ChangeLog
===================================================================
--- trunk/tkabber/ChangeLog	2007-03-04 06:51:50 UTC (rev 999)
+++ trunk/tkabber/ChangeLog	2007-03-04 10:12:00 UTC (rev 1000)
@@ -9,6 +9,8 @@
 	* plugins/chat/abbrev.tcl: Made translated messages extractable by
 	  the extraction script.
 
+	* plugins/chat/logger.tcl: Fixed bug with showing empty history.
+
 2007-03-03  Sergei Golovan  <sgolovan at nes.ru>
 
 	* plugins/general/headlines.tcl: Bugfix. Removed trailing linefeed

Modified: trunk/tkabber/plugins/chat/logger.tcl
===================================================================
--- trunk/tkabber/plugins/chat/logger.tcl	2007-03-04 06:51:50 UTC (rev 999)
+++ trunk/tkabber/plugins/chat/logger.tcl	2007-03-04 10:12:00 UTC (rev 1000)
@@ -302,6 +302,7 @@
     foreach sd [lsort -decreasing [get_subdirs $logfile]] {
 	lappend subdirs [describe_month $sd]
     }
+    lappend subdirs [::msgcat::mc "All"]
     if {[info exists when]} {
 	set text [describe_month $when]
 	if {[lsearch -exact $subdirs $text] < 0} {
@@ -310,7 +311,6 @@
     } else {
 	set text [lindex $subdirs 0]
     }
-    lappend subdirs [::msgcat::mc "All"]
 
     set mcombo [ComboBox $mf.mcombo \
 			 -editable no \



More information about the Tkabber-dev mailing list