[Tkabber-dev] r1246 - in trunk/tkabber-plugins: . floatinglog floatinglog/msgs openurl openurl/msgs

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Sat Oct 6 17:46:25 MSD 2007


Author: sergei
Date: 2007-10-06 17:46:24 +0400 (Sat, 06 Oct 2007)
New Revision: 1246

Added:
   trunk/tkabber-plugins/floatinglog/msgs/
   trunk/tkabber-plugins/floatinglog/msgs/ru.msg
   trunk/tkabber-plugins/openurl/msgs/
   trunk/tkabber-plugins/openurl/msgs/ru.msg
Modified:
   trunk/tkabber-plugins/ChangeLog
   trunk/tkabber-plugins/floatinglog/floatinglog.tcl
   trunk/tkabber-plugins/openurl/openurl.tcl
Log:
	* browser/browser.tcl: Replaced ::jlib::route by the first connection
	  in cinnection list.

	* floatinglog/*, README, Makefile: Added new plugin which reports
	  about incoming messages in a floating log window (thanks to Ruslan
	  Rakhmanin).

	* openurl/openurl.tcl, openurl/msgs/ru.msg: Added support for
	  translations and Russian message file.

	* floatinglog/floatinglog.tcl: Cleaned up messages. Changed time units
	  for hide delay from milliseconds to seconds.

	* floatinglog/msgs/ru.msg: Added Russian translation.


Modified: trunk/tkabber-plugins/ChangeLog
===================================================================
--- trunk/tkabber-plugins/ChangeLog	2007-10-06 11:36:57 UTC (rev 1245)
+++ trunk/tkabber-plugins/ChangeLog	2007-10-06 13:46:24 UTC (rev 1246)
@@ -7,6 +7,14 @@
 	  about incoming messages in a floating log window (thanks to Ruslan
 	  Rakhmanin).
 
+	* openurl/openurl.tcl, openurl/msgs/ru.msg: Added support for
+	  translations and Russian message file.
+
+	* floatinglog/floatinglog.tcl: Cleaned up messages. Changed time units
+	  for hide delay from milliseconds to seconds.
+
+	* floatinglog/msgs/ru.msg: Added Russian translation.
+
 2007-10-05  Sergei Golovan <sgolovan at nes.ru>
 
 	* README: Added missing descriptions.

Modified: trunk/tkabber-plugins/floatinglog/floatinglog.tcl
===================================================================
--- trunk/tkabber-plugins/floatinglog/floatinglog.tcl	2007-10-06 11:36:57 UTC (rev 1245)
+++ trunk/tkabber-plugins/floatinglog/floatinglog.tcl	2007-10-06 13:46:24 UTC (rev 1246)
@@ -17,73 +17,73 @@
     custom::defgroup Plugins [::msgcat::mc "Plugins options."] \
 	-group Tkabber
     custom::defgroup {Floating Log} \
-	[::msgcat::mc "FloatingLog plugin options."] \
+	[::msgcat::mc "Floating Log plugin options."] \
 	-group Plugins
     custom::defgroup {Floating Log Window} \
-	[::msgcat::mc "FloatingLog window properties."] \
+	[::msgcat::mc "Floating Log window properties."] \
 	-group {Floating Log}
     custom::defgroup {Floating Log Control} \
 	[::msgcat::mc "Message types to show."] \
 	-group {Floating Log}
 
     custom::defvar options(show_log) 0 \
-	[::msgcat::mc "Show floating log"] \
+	[::msgcat::mc "Show floating log."] \
 	-type boolean -group {Floating Log}
 
     custom::defvar options(show_chat) 1 \
-	[::msgcat::mc "Show chat messages"] \
+	[::msgcat::mc "Show chat messages."] \
 	-type boolean -group {Floating Log Control}
 
     custom::defvar options(show_groupchat) 1 \
-	[::msgcat::mc "Show groupchat messages"] \
+	[::msgcat::mc "Show groupchat messages."] \
 	-type boolean -group {Floating Log Control}
 
     custom::defvar options(show_other_messages) 1 \
-	[::msgcat::mc "Show other messages"] \
+	[::msgcat::mc "Show other messages."] \
 	-type boolean -group {Floating Log Control}
 
     custom::defvar options(show_when_tkabber_is_active) 0 \
-	[::msgcat::mc "Show when Tkabber is active"] \
+	[::msgcat::mc "Show when Tkabber is active."] \
 	-type boolean -group {Floating Log Control}
 
     custom::defvar options(show_on_away_status) 1 \
-	[::msgcat::mc "Show in \"Away\" status"] \
+	[::msgcat::mc "Show in \"Away\" status."] \
 	-type boolean -group {Floating Log Control}
 
     custom::defvar options(show_on_xa_status) 1 \
-	[::msgcat::mc "Show in \"Extended away\" status"] \
+	[::msgcat::mc "Show in \"Extended away\" status."] \
 	-type boolean -group {Floating Log Control}
 
     custom::defvar options(show_on_dnd_status) 0 \
-	[::msgcat::mc "Show in \"Do not disturb\" status"] \
+	[::msgcat::mc "Show in \"Do not disturb\" status."] \
 	-type boolean -group {Floating Log Control}
 
     custom::defvar options(show_message_body) 1 \
-	[::msgcat::mc "Show incoming message body"] \
+	[::msgcat::mc "Show incoming message body."] \
 	-type boolean -group {Floating Log Control}
 
     
     custom::defvar options(simple_show_scheme) 0 \
-	[::msgcat::mc "Use simple view scheme"] \
+	[::msgcat::mc "Use simple view scheme."] \
 	-type boolean -group {Floating Log Window}
 
     custom::defvar options(alpha) 80 \
-	[::msgcat::mc "Window transparency percent"] \
+	[::msgcat::mc "Window opacity (in percent)."] \
 	-command [list [namespace current]::set_window] \
 	-type integer -group {Floating Log Window}
 
     custom::defvar options(position) "-0-60" \
-	[::msgcat::mc "Window position"] \
+	[::msgcat::mc "Window position."] \
 	-command [list [namespace current]::set_window] \
 	-type string -group {Floating Log Window}
 
     custom::defvar options(width) 300 \
-	[::msgcat::mc "Window width"] \
+	[::msgcat::mc "Window width."] \
 	-command [list [namespace current]::set_window] \
 	-type integer -group {Floating Log Window}
 
-    custom::defvar options(livetime) 5000 \
-	[::msgcat::mc "Delay before message hide (ms)"] \
+    custom::defvar options(livetime) 5 \
+	[::msgcat::mc "Delay before message hide (in seconds)."] \
 	-type integer -group {Floating Log}
 
     #
@@ -195,7 +195,7 @@
 	if {!$options(show_message_body)} {
 	    set body [::msgcat::mc "Incoming message"]
 	}
-	set text [::msgcat::mc "FROM: "]
+	set text [::msgcat::mc "From: "]
 	set formattext [append text  $nick " (" $from ")\n" "\n" $body]
     } else {
 	set text $body
@@ -224,7 +224,8 @@
 		 +[list [namespace current]::left_double_click_message \
 			$connid $from $type]
 	}
-	after $options(livetime) [namespace current]::del_text "$message_name"
+	after [expr {$options(livetime) * 1000}] \
+	      [namespace current]::del_text "$message_name"
     }
 } 
 
@@ -303,7 +304,8 @@
 	}
     }
 
-    after $options(livetime) [namespace current]::del_text "$message_name"
+    after [expr {$options(livetime) * 1000] \
+	  [namespace current]::del_text "$message_name"
 }
 
 proc floatinglog::process_status {text} {

Added: trunk/tkabber-plugins/floatinglog/msgs/ru.msg
===================================================================
--- trunk/tkabber-plugins/floatinglog/msgs/ru.msg	                        (rev 0)
+++ trunk/tkabber-plugins/floatinglog/msgs/ru.msg	2007-10-06 13:46:24 UTC (rev 1246)
@@ -0,0 +1,23 @@
+# $Id$
+
+::msgcat::mcset ru "Delay before message hide (in seconds)." "Задержка перед тем, как сообщение исчезнет (в секундах)."
+::msgcat::mcset ru "From: " "От: "
+::msgcat::mcset ru "Floating Log plugin options." "Настройки расширения Плавающий журнал."
+::msgcat::mcset ru "Floating Log window properties." "Свойства окна плавающего журнала."
+::msgcat::mcset ru "Idle for %s" "Время бездействия %s"
+::msgcat::mcset ru "Incoming message" "Входящее сообщение"
+::msgcat::mcset ru "Message types to show." "Типы сообщений, которые следует показывать."
+::msgcat::mcset ru "Plugins options." "Настройки расширений."
+::msgcat::mcset ru "Show chat messages." "Показывать сообщения разговора."
+::msgcat::mcset ru "Show floating log." "Показывать плавающий журнал."
+::msgcat::mcset ru "Show groupchat messages." "Показывать групповые сообщения."
+::msgcat::mcset ru "Show in \"Away\" status." "Показывать в состоянии \"Отошёл\"."
+::msgcat::mcset ru "Show in \"Do not disturb\" status." "Показывать в состоянии \"Не беспокоить\"."
+::msgcat::mcset ru "Show in \"Extended away\" status." "Показывать в состоянии \"Отошёл давно\"."
+::msgcat::mcset ru "Show incoming message body." "Показывать текст входящих сообщений."
+::msgcat::mcset ru "Show other messages." "Показывать другие сообщения."
+::msgcat::mcset ru "Show when Tkabber is active." "Показывать, когда окно Tkabber'а активно."
+::msgcat::mcset ru "Use simple view scheme." "Использовать упрощенный вывод сообщений."
+::msgcat::mcset ru "Window position." "Положение окна."
+::msgcat::mcset ru "Window opacity (in percent)." "Непрозрачность окна (в процентах)."
+::msgcat::mcset ru "Window width." "Ширина окна."


Property changes on: trunk/tkabber-plugins/floatinglog/msgs/ru.msg
___________________________________________________________________
Name: svn:keywords
   + Author Date Id Revision
Name: svn:eol-style
   + native

Added: trunk/tkabber-plugins/openurl/msgs/ru.msg
===================================================================
--- trunk/tkabber-plugins/openurl/msgs/ru.msg	                        (rev 0)
+++ trunk/tkabber-plugins/openurl/msgs/ru.msg	2007-10-06 13:46:24 UTC (rev 1246)
@@ -0,0 +1,3 @@
+# $Id$
+
+::msgcat::mcset ru "Open URL with %s" "Открыть URL с помощью %s"


Property changes on: trunk/tkabber-plugins/openurl/msgs/ru.msg
___________________________________________________________________
Name: svn:keywords
   + Author Date Id Revision
Name: svn:eol-style
   + native

Modified: trunk/tkabber-plugins/openurl/openurl.tcl
===================================================================
--- trunk/tkabber-plugins/openurl/openurl.tcl	2007-10-06 11:36:57 UTC (rev 1245)
+++ trunk/tkabber-plugins/openurl/openurl.tcl	2007-10-06 13:46:24 UTC (rev 1246)
@@ -1,5 +1,11 @@
+# $Id$
 
+package require msgcat
+
 namespace eval openurl {
+
+    ::msgcat::mcload [file join [file dirname [info script]] msgs]
+
     set options(browsers) [list \
 	firefox "Firefox" \
 	galeon "Galeon" \



More information about the Tkabber-dev mailing list