diff options
| author | 2007-07-04 02:00:24 +0000 | |
|---|---|---|
| committer | 2007-07-04 02:00:24 +0000 | |
| commit | 2e39d5b2b95c2e705fd962c9752070f816c1dfec (patch) | |
| tree | 64d6fde2a4cd488d7add12ca4897daee216777ae /config-default/commands.xml | |
| parent | 6fe4d3ecbdc3196c7c62b9b7e00d5063bd0dbee9 (diff) | |
critical bug fix + code optimizations
Diffstat (limited to 'config-default/commands.xml')
| -rw-r--r-- | config-default/commands.xml | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/config-default/commands.xml b/config-default/commands.xml index 5e5f9e8..8353b0f 100644 --- a/config-default/commands.xml +++ b/config-default/commands.xml @@ -179,8 +179,8 @@ <command cmd="^;exempt (.*)" flag="o"> <![CDATA[ $::eline{lc $1} = 1; - "lc $1\n" >> io 'exempt.txt'; - $conn->privmsg($event->{to}->[0], "lc $1 exempted"); + lc $1 . "\n" >> io 'exempt.txt'; + $conn->privmsg($event->{to}->[0], lc $1 . " exempted"); ]]> </command> <command cmd="^\!ops *(.*)"> @@ -199,4 +199,12 @@ } ]]> </command> + <command cmd="^;blacklist (.*)" flag="o"> + <![CDATA[ + my $str = lc $1; + push(@::string_blacklist, $str); + "$str\n" >> io 'string_blacklist.txt'; + $conn->privmsg($event->{to}->[0], "$str blacklisted"); + ]]> + </command> </commands> |
