def leeches visible for DCs and HCs now member of all groups

[ndwebbie.git] / ND / Web / Pages / DefLeeches.pm

diff --git a/ND/Web/Pages/DefLeeches.pm b/ND/Web/Pages/DefLeeches.pm
index aa921b7255d0ca2318ec66ed97a56492773a57a2..44fc7d1fb64caa46aef268db2e2a2e0ba9796c6c 100644 (file)
--- a/ND/Web/Pages/DefLeeches.pm
+++ b/ND/Web/Pages/DefLeeches.pm
@@ -34,7 +34,7 @@ sub render_body {
        $self->{TITLE} = 'Def Leeches';
        my $DBH = $self->{DBH};
 
-       return $self->noAccess unless $self->isHC;
+       return $self->noAccess unless $self->isDC;
 
        my $query = $DBH->prepare(q{SELECT username,defense_points,count(id) AS calls, SUM(fleets) AS fleets, SUM(recalled) AS recalled
                FROM (SELECT username,defense_points,c.id,count(f.target) AS fleets, count(NULLIF(f.landing_tick + f.eta -1 = f.back,TRUE)) AS recalled