koha-cvs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Koha-cvs] CVS: koha/opac opac-reserve.pl,1.13,1.14


From: Paul POULAIN
Subject: [Koha-cvs] CVS: koha/opac opac-reserve.pl,1.13,1.14
Date: Tue, 29 Apr 2003 09:51:56 -0700

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 => address@hidden);
  
  # 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 => address@hidden, 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) {




reply via email to

[Prev in Thread] Current Thread [Next in Thread]