changeset 31:9ceb6d3cf1af

Don't allow ,lol to be part of a lolmbo
author Jordi Gutiérrez Hermoso <jordigh@octave.org>
date Wed, 12 Jun 2013 16:47:37 -0400
parents a1858b342f5b
children eeb2013a82b6
files teh-lol.pl
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/teh-lol.pl
+++ b/teh-lol.pl
@@ -147,7 +147,7 @@
 
   ## Allow "lol stuff" and e.g. "JordiGH: lol stuff" to be part of a
   ## lolcombo
-  my $islol = $msg =~ /^\s*($nick)?.?\s*l((o|(?<!l)lo)+)l\b/i;
+  my $islol = $msg =~ /^\s*($nick.?\s*)?l((o|(?<!l)lo)+)l\b/i;
 
   if(not $islol) {
     my $combo = $combo_count{$chan};