[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) = @_;