Changeset 24356 for lang

Timestamp:

11/20/08 00:22:08 (5 years ago)

Author:

topia

Message:

explain command configuration.
small style fix.
change sample 'channel'.

Files:

• lang/perl/tiarra/trunk/module/Auto/Outputz.pm (modified) (4 diffs)

lang/perl/tiarra/trunk/module/Auto/Outputz.pm

@@ -6 +6 @@
 use warnings;
 use base qw(Module);
+use Multicast;
 use Module::Use qw(Auto::AliasDB Tools::HTTPClient Auto::Utils);
 use Auto::AliasDB;
@@ -81 +82 @@
         if (Mask::match($ch->[1],$channel)) {
             my $name = Tools::HashTools::replace_recursive(
-                $ch->[0], [{channel => $this->_mangle_string($channel),
-                            channel_short => $this->_mangle_string($chan_short),
-                            network => $this->_mangle_string($network)}]);
+                $ch->[0], [{
+                    channel => $this->_mangle_string($channel),
+                    channel_short => $this->_mangle_string($chan_short),
+                    network => $this->_mangle_string($network)}]);
 
             $this->{matching_cache}->{$channel} = $name;
@@ -143 +145 @@
 key: some secret
 
+# 送信対象にするコマンドの設定。
+# 省略された場合は PRIVMSG 。
+# パラメータ1が送信先、パラメータ2が本文でなければ動作しないので、
+# 動作するコマンドは PRIVMSG/NOTICE/TOPIC/PART 程度。
+-command: PRIVMSG
+
 # 各チャンネルのURIの設定。
 # 記述された順序で検索されるので、全てのチャンネルにマッチする"*"などは最後に書かなければならない。
@@ -150 +158 @@
 # チャンネル名に、 #(network) はネットワーク名にそれぞれ置き換えられる。
 # また、危険な文字は自動的にエスケープされる。
-channel: http://irc.example.com/#(network)/#(channel_short) *
+channel: http://#(network).irc.example.com/#(channel_short) *
 
 =cut