BIG COMMIT : cleaning of Reserves.pm. See detail on koha-devel

[koha.git] / reserve / modrequest.pl

diff --git a/reserve/modrequest.pl b/reserve/modrequest.pl
index 54d15b0..6c2aa4b 100755 (executable)
--- a/reserve/modrequest.pl
+++ b/reserve/modrequest.pl
@@ -25,7 +25,7 @@
 use strict;
 use CGI;
 use C4::Output;
-use C4::Reserves2;
+use C4::Reserves;
 
 my $input = new CGI;
 #print $input->header;
@@ -43,16 +43,16 @@ my $CancelItemnumber=$input->param('CancelItemnumber');
 
 # 2 possibilitys : cancel an item reservation, or modify or cancel the queded list
 
-# 1) cancel an item reservation by fonction GlobalCancel (in reserves2.pm)
+# 1) cancel an item reservation by fonction ModReserveCancelAll (in reserves.pm)
 if ($CancelBorrowerNumber) {
-       GlobalCancel($CancelItemnumber, $CancelBorrowerNumber);
+       ModReserveCancelAll($CancelItemnumber, $CancelBorrowerNumber);
        $biblionumber[0] = $CancelBiblioNumber,
 }
 
 # 2) Cancel or modify the queue list of reserves (without item linked)
 else {
        for (my $i=0;$i<$count;$i++){
-               UpdateReserve($rank[$i],$biblionumber[$i],$borrower[$i],$branch[$i],$itemnumber[$i]); #from C4::Reserves2
+               ModReserve($rank[$i],$biblionumber[$i],$borrower[$i],$branch[$i],$itemnumber[$i]); #from C4::Reserves
        }
 }
 my $from=$input->param('from');