[Tkabber-dev] r157 - in trunk/plugins/autoanswer: . msgs

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Tue Oct 21 17:29:42 MSD 2008


Author: kostix
Date: 2008-10-21 17:29:41 +0400 (Tue, 21 Oct 2008)
New Revision: 157

Modified:
   trunk/plugins/autoanswer/autoanswer.tcl
   trunk/plugins/autoanswer/msgs/ru.msg
Log:
autoanswer/autoanswer.tcl: Fixed to work with the latest changes
 in the Tkabber mainline.

autoanswer/msgs/ru.msg: Fixed spelling.


Modified: trunk/plugins/autoanswer/autoanswer.tcl
===================================================================
--- trunk/plugins/autoanswer/autoanswer.tcl	2008-10-21 12:54:02 UTC (rev 156)
+++ trunk/plugins/autoanswer/autoanswer.tcl	2008-10-21 13:29:41 UTC (rev 157)
@@ -107,7 +107,7 @@
 }
 
 # Sends the message ($options(message))
-proc autoanswer::process_message {connid from id type \
+proc autoanswer::process_message {xlib from id type \
 		is_subject subject body args} {
 	global userstatus textstatus statusdesc
 	variable options
@@ -121,15 +121,15 @@
 	if {![string equal $type chat]} {
 		return
 	}
-	set chatid [::chat::chatid $connid $from]
+	set chatid [::chat::chatid $xlib $from]
 	# Do not reply in MUCs
 	if { [::chat::is_groupchat $chatid] } {
 		return
 	}
 	# We should never reply to itself:
 	if { [string equal \
-		[node_and_server_from_jid [jlib::connection_jid $connid]] \
-		[node_and_server_from_jid $from]] } return
+		[xmpp::jid::stripResource [connection_jid $xlib]] \
+		[xmpp::jid::stripResource $from]] } return
 	# Do not reply if regexp rules are not met
 	# Do not reply to empty messages
 	if { [regexp -nocase $options(disable_regex) $from] \

Modified: trunk/plugins/autoanswer/msgs/ru.msg
===================================================================
--- trunk/plugins/autoanswer/msgs/ru.msg	2008-10-21 12:54:02 UTC (rev 156)
+++ trunk/plugins/autoanswer/msgs/ru.msg	2008-10-21 13:29:41 UTC (rev 157)
@@ -6,7 +6,7 @@
 ::msgcat::mcset ru "Body of message used for auto-answering. Three special tokens are expanded before sending: %s is expaneded to your current availability status, %t expands to your status text and %% expands to a single %. If this text is empty (the default) Tkabber will cook for you a polite descriptive message including your availability status and status text." \
 	"Тело сообщения, используемого для автоответа. Перед отсылкой в сообщении раскрываются три ключевых слова: %s раскрывается в текущий статус вашей доступности, %t -- в описание статуса, а %% -- в символ %. Если этот текст является пустой строкой (это значение по умолчанию), Tkabber самостоятельно сформирует вежливый текст, содержащий статус вашей текущей доступности и его описание."
 ::msgcat::mcset ru "Enables or disables automatic answering. You can also control this setting from the main toolbar." \
-	"Разрешает или запрещает автоответ. Вы также можете управлеть этой настройкой при помощи кнопки на главной панели инструментов."
+	"Разрешает или запрещает автоответ. Вы также можете управлять этой настройкой при помощи кнопки на главной панели инструментов."
 ::msgcat::mcset ru "List of availability states in which auto-answer is forcibly turned on independently of its main setting. This must be a whitespace-separated list of tokens, valid tokens are: available, away, xa and dnd." \
 	"Список состояний доступности, в которых автоответ включается принудительно, независимо от состояния его основной настройки. Это должен быть список ключевых слов, разделённых пробельными символами. Допустимые ключевые слова: available, away, xa и dnd."
 ::msgcat::mcset ru "Plugins options." \



More information about the Tkabber-dev mailing list