diff options
| author | 2007-11-25 21:33:40 +0000 | |
|---|---|---|
| committer | 2007-11-25 21:33:40 +0000 | |
| commit | 0293b9d684ce2f89a1850b7a0d4819bdd1c947ef (patch) | |
| tree | c7ea8fc9bd40b46797ba690ebe7b4066c178518d /config-default/commands.xml | |
| parent | 917638dfdf31e26ae9115dabb5c2fe528866c549 (diff) | |
better logging, better flood detection, command ignoring
Diffstat (limited to 'config-default/commands.xml')
| -rw-r--r-- | config-default/commands.xml | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/config-default/commands.xml b/config-default/commands.xml index 3ab49e9..5a4341c 100644 --- a/config-default/commands.xml +++ b/config-default/commands.xml @@ -1,4 +1,13 @@ <commands> + <command cmd="^;sql (main|log) (.*)"> + <![CDATA[ + my $dbh = $::db->{DBH}; + if ($1 eq 'log') { + $dbh = $::db->{DBH_LOG}; + } + $::db->raw($conn, $event->{to}->[0], $dbh, $2); + ]]> + </command> <command cmd="^;help$"> <![CDATA[ $conn->privmsg($event->{to}->[0], "help is at http://meta.wikimedia.org/wiki/User:WHeimbigner/AntiSpamMeta"); |
