[Koha-cvs] CVS: koha/opac opac-reserve.pl,1.13,1.14
Paul POULAIN
tipaul at users.sourceforge.net
Tue Apr 29 18:51:56 CEST 2003
Update of /cvsroot/koha/koha/opac
In directory sc8-pr-cvs1:/tmp/cvs-serv5798/opac
Modified Files:
opac-reserve.pl
Log Message:
Index: opac-reserve.pl
===================================================================
RCS file: /cvsroot/koha/koha/opac/opac-reserve.pl,v
retrieving revision 1.13
retrieving revision 1.14
diff -C2 -r1.13 -r1.14
*** opac-reserve.pl 26 Mar 2003 04:42:56 -0000 1.13
--- opac-reserve.pl 29 Apr 2003 16:51:54 -0000 1.14
***************
*** 33,47 ****
my @bordat;
$bordat[0] = $borr;
- $template->param(BORROWER_INFO => \@bordat);
# get biblionumber.....
my $biblionumber = $query->param('bib');
- $template->param(biblionumber => $biblionumber);
my $bibdata = bibdata($biblionumber);
! $template->param($bibdata);
# get the rank number....
! my ($rank,$reserves) = FindReserves($biblionumber);
$template->param(reservecount => $rank);
--- 33,46 ----
my @bordat;
$bordat[0] = $borr;
# get biblionumber.....
my $biblionumber = $query->param('bib');
my $bibdata = bibdata($biblionumber);
! $template->param($bibdata);
! $template->param(BORROWER_INFO => \@bordat, biblionumber => $biblionumber);
# get the rank number....
! my ($rank,$reserves) = FindReserves($biblionumber,'');
$template->param(reservecount => $rank);
***************
*** 164,168 ****
}
my $last = @row;
! $row[$last-1]->{'last'} =1 if $last == $width;
my $fill = ($width - $last)*2;
$fill-- if $fill;
--- 163,167 ----
}
my $last = @row;
! $row[$last-1]->{'last'} =1 if $last == $width;
my $fill = ($width - $last)*2;
$fill-- if $fill;
***************
*** 236,240 ****
$template->param(too_much_oweing => $amount);
}
! my ($resnum, $reserves) = FindReserves(undef, $borrowernumber);
$template->param(RESERVES => $reserves);
if ($resnum >= $MAXIMUM_NUMBER_OF_RESERVES) {
--- 235,239 ----
$template->param(too_much_oweing => $amount);
}
! my ($resnum, $reserves) = FindReserves('', $borrowernumber);
$template->param(RESERVES => $reserves);
if ($resnum >= $MAXIMUM_NUMBER_OF_RESERVES) {
More information about the Koha-cvs
mailing list