Perlbot/perlbuut
1
0
Fork 0
mirror of https://github.com/perlbot/perlbuut synced 2025-06-08 02:55:40 -04:00
Code Issues Releases Wiki Activity

trying to make /i work right

Browse source
This commit is contained in:
Ryan Voots 2010-03-12 15:59:45 -05:00
parent 06cf9f2244
commit 6def2adcf4
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
plugins/factoids.pm
View file

@ -338,7 +338,7 @@ sub _fact_substitute
} }
else else
{ {
my $regex = $flags=~/i/ ? qr/$match/i : qr/$match/; my $regex = $flags=~/i/ ? qr/(?i)$match/ : qr/$match/;
if ($pred =~ m/$regex/) if ($pred =~ m/$regex/)
{ {