diff --git a/C4/Reserves2.pm b/C4/Reserves2.pm
index 53d72ce56d..24a3f611e6 100755
--- a/C4/Reserves2.pm
+++ b/C4/Reserves2.pm
@@ -95,7 +95,7 @@ sub CheckReserves {
 sub CancelReserve {
     my ($biblio, $item, $borr) = @_;
     my $dbh=C4Connect;
-    warn "In CancelReserve";
+    #warn "In CancelReserve";
     if (($item and $borr) and (not $biblio)) {
 # removing a waiting reserve record....
 	$item = $dbh->quote($item);
@@ -177,7 +177,7 @@ sub fixpriority {
                                WHERE biblionumber     = $nbib 
                                  AND borrowernumber   = $nbor
                                  AND reservedate      = $nresd";
-	    warn $query;
+	    #warn $query;
 	    my $sth = $dbh->prepare($query);
 	    $sth->execute;
 	    $sth->finish;