X-Git-Url: http://git.vpit.fr/?p=perl%2Fscripts%2Fxchat.git;a=blobdiff_plain;f=tools.pl;h=bf6af1804e4f3e6456d79e88646a9fd2c65ccd84;hp=f162dad5a159674c7b34d44f04016f83c299422a;hb=adb8d6067cfe7d29f2d1bd57e90a21a07c25c2e8;hpb=742dde9fdf8ef61c1a1382d326aaa2c1293a9f54

diff --git a/tools.pl b/tools.pl
index f162dad..bf6af18 100755
--- a/tools.pl
+++ b/tools.pl
@@ -118,7 +118,7 @@ hook_command 'WIDE', sub {
 hook_command 'HGREP', sub {
  my $txt = $_[1][1];
  return EAT_ALL unless defined $txt;
- $txt = qr/$txt/;
+ $txt = qr/$txt/i;
  my @matches;
  for (get_list 'users') {
   my $host = $_->{host};