From 0187bcaf8404f1cfe9d39919ed49882ea703af08 Mon Sep 17 00:00:00 2001 From: Paul POULAIN Date: Wed, 8 Aug 2007 11:59:52 +0200 Subject: [PATCH] tidying SQL query Signed-off-by: Chris Cormack --- cataloguing/z3950_search.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/cataloguing/z3950_search.pl b/cataloguing/z3950_search.pl index 87f7712ae3..ae50624665 100755 --- a/cataloguing/z3950_search.pl +++ b/cataloguing/z3950_search.pl @@ -82,7 +82,8 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user( $template->param( frameworkcode => $frameworkcode, ); if ( $op ne "do_search" ) { - my $sth = $dbh->prepare("select id,host,checked from z3950servers order by host"); + # FIXME : remove sql queries & put that in a specific package (Z3950.pm ?, but it's unused atm) + my $sth = $dbh->prepare("SELECT id,host,checked FROM z3950servers ORDER by host"); $sth->execute(); my $serverloop = $sth->fetchall_arrayref( {} ); $template->param( -- 2.39.5