diff options
| author |   William Heimbigner <william.heimbigner@gmail.com> | 2011-10-20 23:17:19 +0000 |
|---|---|---|
| committer | William Heimbigner <william.heimbigner@gmail.com> | 2011-10-20 23:17:19 +0000 |
| commit | c4b144a7192bda12cc71c6223f78cfd9f3fadf73 (patch) | |
| tree | d4999bb80b5e14a6515a34e184753a374446555b /config-default | |
| parent | 9decb30ef8777f0bf1307517cf3717da2d7761c1 (diff) | |
Added a command for changing whether or not a channel was being monitored, and fixed what I think was a huge backdoor
Diffstat (limited to 'config-default')
| -rw-r--r-- | config-default/commands.xml | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/config-default/commands.xml b/config-default/commands.xml index 52f9339..87728a6 100644 --- a/config-default/commands.xml +++ b/config-default/commands.xml @@ -4,7 +4,7 @@ $conn->privmsg($event->{to}->[0], "source is at http://svn.linuxrulz.org/repos/antispammeta"); ]]> </command> - <command cmd="^;sql (main|log) (.*)"> + <command cmd="^;sql (main|log) (.*)" flag="d"> <![CDATA[ my $dbh = $::db->{DBH}; if ($1 eq 'log') { @@ -13,6 +13,20 @@ $::db->raw($conn, $event->{to}->[0], $dbh, $2); ]]> </command> + <command cmd="^;monitor (\S+) (yes|no)$" flag="a"> + <![CDATA[ + my $chan = lc $1; + my $switch = lc $2; + my $link = ASM::Util->getLink(lc $chan); + if ( lc $link ne lc $chan ) { + $conn->privmsg($event->{to}->[0], "Error: $chan is linked to $link - use $link instead."); + return; + } + $::channels->{channel}->{$chan}->{monitor} = $switch; + ASM::XML->writeChannels(); + $conn->privmsg($event->{to}->[0], "Monitor flag for $chan set to $switch"); + ]]> + </command> <command cmd="^;help$"> <![CDATA[ $conn->privmsg($event->{to}->[0], "help is at http://meta.wikimedia.org/wiki/User:WHeimbigner/AntiSpamMeta"); |