diff --git a/C4/Search.pm b/C4/Search.pm
index 649273fda5..3df3ef4f34 100755
--- a/C4/Search.pm
+++ b/C4/Search.pm
@@ -1841,7 +1841,7 @@ sub BornameSearch  {
 	}
 
 	my $sth=$dbh->prepare($query);
-	warn "Q $orderby : $query";
+#	warn "Q $orderby : $query";
 	$sth->execute(@bind);
 	my @results;
 	my $cnt=$sth->rows;