From 2e39d5b2b95c2e705fd962c9752070f816c1dfec Mon Sep 17 00:00:00 2001
From: William Heimbigner <william.heimbigner@gmail.com>
Date: Wed, 4 Jul 2007 02:00:24 +0000
Subject: critical bug fix + code optimizations

---
 modules/inspect.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'modules/inspect.pl')

diff --git a/modules/inspect.pl b/modules/inspect.pl
index a5fd732..bed8a46 100644
--- a/modules/inspect.pl
+++ b/modules/inspect.pl
@@ -3,6 +3,7 @@ use warnings;
 use strict;
 
 use Data::Dumper;
+use List::Util qw(first);
 
 %::ignored = ();
 sub new
@@ -23,7 +24,7 @@ sub inspect {
   my @override = [];
   our $unmode='';
   my $nick = lc $event->{nick};
-  return if (defined($::eline{$nick}) || defined($::eline{lc $event->{user}}) || defined(lc $event->{host}));
+  return if (defined($::eline{$nick}) || defined($::eline{lc $event->{user}}) || defined($::eline{lc $event->{host}}));
   $iaddr = gethostbyname($event->{host});
   $rev = join('.', reverse(unpack('C4', $iaddr))).'.' if (defined $iaddr);
   %monx = defined($::channels->{channel}->{master}->{event}) ? %{$::channels->{channel}->{master}->{event}} : ();
-- 
cgit v1.2.3