summaryrefslogtreecommitdiffstats
path: root/config-default/commands.xml
diff options
context:
space:
mode:
authorLibravatarWilliam Heimbigner <william.heimbigner@gmail.com>2011-04-26 17:42:42 +0000
committerLibravatarWilliam Heimbigner <william.heimbigner@gmail.com>2011-04-26 17:42:42 +0000
commitaa421a2d56c5bdfb467eddaba478e5aef04bbce4 (patch)
tree19227ab5338617627d11f71815bb4a939d203531 /config-default/commands.xml
parent19aa221058512854b805994803e91214cd094b40 (diff)
Lots of added stuff. Don't know whatall.
Diffstat (limited to 'config-default/commands.xml')
-rw-r--r--config-default/commands.xml19
1 files changed, 13 insertions, 6 deletions
diff --git a/config-default/commands.xml b/config-default/commands.xml
index 3dba162..52f9339 100644
--- a/config-default/commands.xml
+++ b/config-default/commands.xml
@@ -16,6 +16,7 @@
<command cmd="^;help$">
<![CDATA[
$conn->privmsg($event->{to}->[0], "help is at http://meta.wikimedia.org/wiki/User:WHeimbigner/AntiSpamMeta");
+ $conn->privmsg($event->{to}->[0], "You can also get faster help by emailing william dot heimbigner at ttu dot edu - or bug ErrantEgo or tomaw");
]]>
</command>
<command cmd="^;db$">
@@ -274,12 +275,18 @@
</command>
<command cmd="^\!ops ?(#\S+)? ?(.*)" nohush="nohush">
<![CDATA[
- my $tgt = $event->{to}->[0];
- $tgt = $1 if (defined($1));
- my $msg = $1;
- $msg = $2 if defined($2);
- my $hilite=ASM::Util->commaAndify(ASM::Util->getAlert($tgt, 'opalert', 'hilights'));
- $conn->privmsg($_, "[\x02$tgt\x02] - $event->{nick} wants op attention ($msg) $hilite") foreach ASM::Util->getAlert($tgt, 'opalert', 'msgs');
+ if ($::sn{lc $event->{nick}}->{dnsbl} == 0) {
+ my $tgt = $event->{to}->[0];
+ $tgt = $1 if (defined($1));
+ my $msg = $1;
+ $msg = $2 if defined($2);
+ unless (defined($::ignored{$tgt}) && ($::ignored{$tgt} >= $::RISKS{'opalert'})) {
+ $::ignored{$tgt} = $::RISKS{'opalert'};
+ $conn->schedule(30, sub { delete($::ignored{$tgt})});
+ my $hilite=ASM::Util->commaAndify(ASM::Util->getAlert($tgt, 'opalert', 'hilights'));
+ $conn->privmsg($_, "[\x02$tgt\x02] - $event->{nick} wants op attention ($msg) $hilite") foreach ASM::Util->getAlert($tgt, 'opalert', 'msgs');
+ }
+ }
]]>
</command>
<command cmd="^;blacklist (.*)" flag="o">