From 3a488a4aa632da8e93200e4599eb2d24d931f4a2 Mon Sep 17 00:00:00 2001 From: Tomas Plesnik <plesnik@ics.muni.cz> Date: Mon, 11 Feb 2013 11:33:31 +0100 Subject: [PATCH] zmena na vypis pouze validnich klientu --- src/warden-server/bin/getClients.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/warden-server/bin/getClients.pl b/src/warden-server/bin/getClients.pl index faf1e5e..acdb0a9 100755 --- a/src/warden-server/bin/getClients.pl +++ b/src/warden-server/bin/getClients.pl @@ -56,7 +56,7 @@ our $DBH = DBI->connect("DBI:mysql:database=$WardenCommon::DB_NAME;host=$WardenC || die "Could not connect to database: $DBI::errstr"; # obtain data from DB -my $sth = $DBH->prepare("SELECT * FROM clients ORDER BY client_id ASC;") or die "Cannot prepare statement: " . $DBH->errstr; +my $sth = $DBH->prepare("SELECT * FROM clients WHERE valid = 't' ORDER BY client_id ASC;") or die "Cannot prepare statement: " . $DBH->errstr; $sth->execute or die "Cannot execute statement: " . $sth->errstr; my $hash_ref = $sth->fetchall_hashref("client_id"); -- GitLab