[Koha-cvs] CVS: koha/C4 Reserves2.pm,1.26,1.27

[Ambrose Li]

Update of /cvsroot/koha/koha/C4
In directory sc8-pr-cvs1:/tmp/cvs-serv9566/C4

Modified Files:
        Reserves2.pm 
Log Message:
Tentatively export the "internal" function CalcReserveFee ; opac-reserves
uses it

Noted correct tab size


Index: Reserves2.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Reserves2.pm,v
retrieving revision 1.26
retrieving revision 1.27
diff -C2 -r1.26 -r1.27
*** Reserves2.pm        20 Jan 2003 07:38:54 -0000      1.26
--- Reserves2.pm        6 Feb 2003 07:41:28 -0000       1.27
***************
*** 1,2 ****
--- 1,5 ----
+ # -*- tab-width: 8 -*-
+ # NOTE: This file uses standard 8-character tabs
+ 
  package C4::Reserves2;
  
***************
*** 53,57 ****
  
  @ISA = qw(Exporter);
! @EXPORT = qw(&FindReserves &CheckReserves &CheckWaiting &CancelReserve 
&FillReserve &ReserveWaiting &CreateReserve &updatereserves &UpdateReserve 
&getreservetitle &Findgroupreserve);
  
  # make all your functions, whether exported or not;
--- 56,74 ----
  
  @ISA = qw(Exporter);
! # FIXME Take out CalcReserveFee after it can be removed from opac-reserves.pl
! @EXPORT = qw(
!     &FindReserves
!     &CheckReserves
!     &CheckWaiting
!     &CancelReserve
!     &CalcReserveFee
!     &FillReserve
!     &ReserveWaiting
!     &CreateReserve
!     &updatereserves
!     &UpdateReserve
!     &getreservetitle
!     &Findgroupreserve
! );
  
  # make all your functions, whether exported or not;
***************
*** 595,598 ****
--- 612,616 ----
  # C4::Reserves. Pick one and stick with it.
  # XXX - Internal use only
+ # FIXME - opac-reserves.pl need to use it, temporarily put into @EXPORT
  sub CalcReserveFee {
    my ($env,$borrnum,$biblionumber,$constraint,$bibitems) = @_;