diff options
| author |   William Heimbigner <william.heimbigner@gmail.com> | 2012-08-21 05:53:57 +0000 |
|---|---|---|
| committer | William Heimbigner <william.heimbigner@gmail.com> | 2012-08-21 05:53:57 +0000 |
| commit | 456b84b1b1257cff000c320cb5a1685d73648e2f (patch) | |
| tree | 631e221803a53d0568222a1e046ececdc909080f /config-default | |
| parent | 96a28d32af3d3aaa8292cbb7a498d2fbdca32546 (diff) | |
Add some autoreplies when people call for ops
Diffstat (limited to 'config-default')
| -rw-r--r-- | config-default/commands.xml | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/config-default/commands.xml b/config-default/commands.xml index 19e91ac..f8c9a76 100644 --- a/config-default/commands.xml +++ b/config-default/commands.xml @@ -319,12 +319,41 @@ my $msg = $1; $msg = $2 if defined($2); unless (defined($::ignored{$tgt}) && ($::ignored{$tgt} >= $::RISKS{'opalert'})) { + if (lc $event->{to}->[0] eq '##linux') { + $conn->privmsg($event->{nick}, "I've summoned op attention. In the future, please use /msg " . + "$conn->{_nick} !ops $event->{to}->[0] reasonGoesHere - this allows ops to " . + "be notified while minimizing channel hostility."); + } elsif (lc $event->{to}->[0] eq lc $conn->{_nick}) { + if (lc $tgt eq lc $conn->{_nick}) { # they privmsged the bot without providing a target + $conn->privmsg($event->{nick}, "Sorry, it looks like you've tried to use the !ops command " . + "via PM but haven't specified a target. Try again with /msg $conn->{_nick} " . + "!ops #channelGoesHere ReasonGoesHere"); + return; + } else { + $conn->privmsg($event->{nick}, "Thanks, I'm notifying $tgt ops."); + } + } $::ignored{$tgt} = $::RISKS{'opalert'}; $conn->schedule(30, sub { delete($::ignored{$tgt})}); my $hilite=ASM::Util->commaAndify(ASM::Util->getAlert($tgt, 'opalert', 'hilights')); my $txtz = "[\x02$tgt\x02] - $event->{nick} wants op attention ($msg) $hilite"; my @tgts = ASM::Util->getAlert($tgt, 'opalert', 'msgs'); ASM::Util->sendLongMsg($conn, \@tgts, $txtz); + } else { # ops has recently been called + if (lc $event->{to}->[0] eq '##linux') { + $conn->privmsg($event->{nick}, "I've already been recently asked to summon op attention. " . + "In the future, please use /msg $conn->{_nick} !ops $event->{to}->[0] reasonGoesHere" . + " - this allows ops to be notified while minimizing channel hostility."); + } elsif (lc $event->{to}->[0] eq lc $conn->{_nick}) { + if (lc $tgt eq lc $conn->{_nick}) { # they privmsged the bot without providing a target + $conn->privmsg($event->{nick}, "Sorry, it looks like you've tried to use the !ops command" . + "via PM but haven't specified a target. Try again with /msg $conn->{_nick}" . + " !ops #channelGoesHere ReasonGoesHere"); + return; + } else { + $conn->privmsg($event->{nick}, "I've already recently notified $tgt ops."); + } + } } } ]]> |