From 6ae9c1d4af7a18eebfa1f007b2bc25022775824c Mon Sep 17 00:00:00 2001
From: rangi <rangi>
Date: Tue, 22 Apr 2003 08:39:04 +0000
Subject: [PATCH] Fixing bug 388

---
 modrequest.pl | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/modrequest.pl b/modrequest.pl
index aec24f1e93..7ca207de1f 100755
--- a/modrequest.pl
+++ b/modrequest.pl
@@ -32,11 +32,11 @@ use C4::Reserves2;
 my $input = new CGI;
 #print $input->header;
 
-#print $input->dump;
+#print $input->Dump;
 
 my @rank=$input->param('rank-request');
 my @biblio=$input->param('biblio');
-my @borrower=$input->param('borrower');
+my @borrower=$input->param('borrowernumber');
 my @branch=$input->param('pickup');
 my $count=@rank;
 
@@ -44,6 +44,7 @@ my $count=@rank;
 # no attempt is made to check consistency.
 for (my $i=0;$i<$count;$i++){
     UpdateReserve($rank[$i],$biblio[$i],$borrower[$i],$branch[$i]); #from C4::Reserves2
+      print "updating reserve";
 }
 
 my $from=$input->param('from');
-- 
2.39.2