[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