From 02e11ad7483c5d43b1cc9c788e81a9cf69d4b2b5 Mon Sep 17 00:00:00 2001 From: Neil Moore Date: Mon, 9 Jul 2012 01:20:36 -0500 Subject: More easter eggs. --- lib/Crawl/Bot/Plugin/Logging.pm | 18 +++++++++++++++++- 1 file changed, 17 insertions(+), 1 deletion(-) diff --git a/lib/Crawl/Bot/Plugin/Logging.pm b/lib/Crawl/Bot/Plugin/Logging.pm index 0326337..cea86cd 100644 --- a/lib/Crawl/Bot/Plugin/Logging.pm +++ b/lib/Crawl/Bot/Plugin/Logging.pm @@ -73,12 +73,28 @@ sub said { $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/) + 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?" ); + } elsif ($args->{channel} ne "msg" + and $args->{who} =~ /^(?:Gretell|Henzell|\|amethyst)$/ + and $args->{body} =~ /^(\S+) .*abandoned Cheibriados\./) + { + $self->say( + channel => $args->{channel}, + body => "Fine, $1, I didn't like you either!" + ); + } elsif ($args->{channel} ne "msg" + and $args->{who} =~ /^(?:Gretell|Henzell|\|amethyst)$/ + and $args->{body} =~ /^(Chei\S+) .*became the Champion of [^C]/) + { + $self->say( + channel => $args->{channel}, + body => "Did I ever mention that $1 is a heretic?" + ); } return; -- cgit v1.2.3-54-g00ecf