diff options
Diffstat (limited to 'config-default')
| -rw-r--r-- | config-default/channels.xml | 1 | ||||
| -rw-r--r-- | config-default/commands.xml | 12 |
2 files changed, 11 insertions, 2 deletions
diff --git a/config-default/channels.xml b/config-default/channels.xml index 035fcd4..de9800b 100644 --- a/config-default/channels.xml +++ b/config-default/channels.xml @@ -193,6 +193,7 @@ <event id="wikifags2" action="none" class="re" nocase="nocase" reason="saying 'sure are a lot of wikifag'..." risk="low" time="0" type="public">sure are a ?lot of wikifag</event> <event id="dcc-part" action="ban" class="re" reason="using the DC.C SE.ND exploit in a part message" risk="high" time="0" type="part">DCC SEND </event> <event id="levenflood" action="none" class="levenflood" reason="levenshtein flood match" risk="debug" time="0" type="public" override="flood-5to3">contentisuseless</event> + <event id="blacklist" action="none" class="strbl" reason="sending pm matching string blacklist" risk="low" time="0" type="public">blah</event> <hilights> <debug>AfterDeath</debug> </hilights> 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> |