[Koha-cvs] CVS: koha/C4 Reserves.pm,1.3,1.4

[Andrew Arensburger]

Update of /cvsroot/koha/koha/C4
In directory usw-pr-cvs1:/tmp/cvs-serv24326a

Modified Files:
        Reserves.pm 
Log Message:
Added some FIXME comments.


Index: Reserves.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Reserves.pm,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -r1.3 -r1.4
*** Reserves.pm 5 Oct 2002 09:52:11 -0000       1.3
--- Reserves.pm 12 Oct 2002 07:31:35 -0000      1.4
***************
*** 1,7 ****
! package C4::Reserves; #asummes C4/Reserves
! 
! #requires DBI.pm to be installed
! #uses DBD:Pg
! 
  
  # Copyright 2000-2002 Katipo Communications
--- 1,3 ----
! package C4::Reserves;
  
  # Copyright 2000-2002 Katipo Communications
***************
*** 22,25 ****
--- 18,23 ----
  # Suite 330, Boston, MA  02111-1307 USA
  
+ # FIXME - I suspect that this module is obsolete.
+ 
  use strict;
  require Exporter;
***************
*** 76,79 ****
--- 74,79 ----
  # make all your functions, whether exported or not;
  
+ # FIXME - This doesn't appear to ever be used, except in modules that
+ # appear to be obsolete.
  sub EnterReserves{
    my ($env)address@hidden;  
***************
*** 190,193 ****
--- 190,195 ----
  }
  
+ # FIXME - A functionally identical version of this function appears in
+ # C4::Reserves2. Pick one and stick with it.
  sub CalcReserveFee {
    my ($env,$borrnum,$biblionumber,$constraint,$bibitems) = @_;
***************
*** 262,265 ****
--- 264,269 ----
  } # end CalcReserveFee
  
+ # FIXME - A somewhat different version of this function appears in
+ # C4::Reserves2. Pick one and stick with it.
  sub CreateReserve {
    my ($env,$branch,$borrnum,$biblionumber,$constraint,$bibitems,$fee) = @_;