From 6ae9c1d4af7a18eebfa1f007b2bc25022775824c Mon Sep 17 00:00:00 2001 From: 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.5