X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=ND%2FIRC%2FAccess.pm;h=77f88cb047fe13a018d38e1b37cc5abccfe75849;hb=77e873677329b64c68bf3e3dc84f229eeafb1c83;hp=c3f9ef1eb0f5d34421715723a4ada572ba8e0614;hpb=645c4eb3a875e41cee1988b357e6fa2844d30668;p=ndwebbie.git diff --git a/ND/IRC/Access.pm b/ND/IRC/Access.pm index c3f9ef1..77f88cb 100644 --- a/ND/IRC/Access.pm +++ b/ND/IRC/Access.pm @@ -55,7 +55,7 @@ sub groupmember { my ($groups) = @_; $groups = join ",", map {"'$_'"} split //, $groups; my $f = $ND::DBH->prepare("SELECT uid,username FROM users NATURAL JOIN groupmembers NATURAL JOIN groups WHERE flag IN ('T',$groups) AND lower(hostmask) = ?"); - $f->execute($ND::address); + $f->execute(lc($ND::address)); return $f->fetchrow_hashref; };