summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorNeil Moore <neil@s-z.org>2012-07-08 23:08:34 -0500
committerNeil Moore <neil@s-z.org>2012-07-08 23:08:34 -0500
commitddba2facafd2a229d34f8502b08b283d2e41bb5f (patch)
treeaf8591147660f3193a31ef136061e26d2b6dc25b
parent2c44f03e6b5282057ce03451a4f1b5350a347cda (diff)
downloadcrawlbot-ddba2facafd2a229d34f8502b08b283d2e41bb5f.tar.gz
crawlbot-ddba2facafd2a229d34f8502b08b283d2e41bb5f.zip
An easter egg for Chei players in ##crawl.
-rw-r--r--lib/Crawl/Bot/Plugin/Logging.pm9
1 files changed, 9 insertions, 0 deletions
diff --git a/lib/Crawl/Bot/Plugin/Logging.pm b/lib/Crawl/Bot/Plugin/Logging.pm
index 1d46d14..6bc6ecc 100644
--- a/lib/Crawl/Bot/Plugin/Logging.pm
+++ b/lib/Crawl/Bot/Plugin/Logging.pm
@@ -71,7 +71,16 @@ sub said {
# Only log the first channel
if ($args->{channel} eq $self->bot->{channels}[0]) {
$self->log_message("<$args->{who}> $args->{body}");
+ } elsif ($args->{channel} ne "msg"
+ and $args->{who} =~ /^(?:Gretell|Henzell|\|amethyst)$/
+ and $args->{body} =~ /(\S+) .*became the Champion of Cheibriados/)
+ {
+ $self->say(
+ channel => $args->{channel},
+ body => "Did I ever mention that $1 is one of my favourite people?"
+ );
}
+
return;
}