removing "warn"

diff --git a/C4/Authorities.pm b/C4/Authorities.pm
index caad562..85bbcf4 100644 (file)
--- a/C4/Authorities.pm
+++ b/C4/Authorities.pm
@@ -178,7 +178,7 @@ sub searchauthority  {
        $query .= " and match (category,freelib) AGAINST ('$searchstring')" if ($searchstring);
 #      $query .= " and freelib like \"$searchstring%\"" if ($searchstring);
        $query .= " order by category,freelib limit $offset,".($pagesize*4);
-       warn "q : $query";
+#      warn "q : $query";
        my $sth=$dbh->prepare($query);
        $sth->execute;
        my @results;