From: Paul Poulain <[email protected]>

Signed-off-by: Henri-Damien LAURENT <[email protected]>
---
 C4/Search.pm |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/C4/Search.pm b/C4/Search.pm
index cbe212f..82ae4e5 100644
--- a/C4/Search.pm
+++ b/C4/Search.pm
@@ -2612,7 +2612,7 @@ sub GetDistinctValues {
     if ($fieldname=~/\./){
                        my ($table,$column)=split /\./, $fieldname;
                        my $dbh = C4::Context->dbh;
-                       warn "select DISTINCT($column) as value, count(*) as 
cnt from $table group by lib order by $column ";
+                       warn "select DISTINCT($column) as value, count(*) as 
cnt from $table group by lib order by $column " if $DEBUG;
                        my $sth = $dbh->prepare("select DISTINCT($column) as 
value, count(*) as cnt from $table ".($string?" where $column like 
\"$string%\"":"")."group by value order by $column ");
                        $sth->execute;
                        my $elements=$sth->fetchall_arrayref({});
-- 
1.6.3.3

_______________________________________________
Koha-patches mailing list
[email protected]
http://lists.koha.org/mailman/listinfo/koha-patches

Reply via email to