koha-cvs
[Top][All Lists]
Advanced

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

[Koha-cvs] CVS: koha/C4 Circulation.pm,1.6,1.7


From: Andrew Arensburger
Subject: [Koha-cvs] CVS: koha/C4 Circulation.pm,1.6,1.7
Date: Sat, 12 Oct 2002 23:03:05 -0700

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

Modified Files:
        Circulation.pm 
Log Message:
Added some FIXME comments.
Added RCS magic comment.
Removed unused finalizer.


Index: Circulation.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Circulation.pm,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -r1.6 -r1.7
*** Circulation.pm      11 Oct 2002 12:36:44 -0000      1.6
--- Circulation.pm      13 Oct 2002 06:03:03 -0000      1.7
***************
*** 1,3 ****
! package C4::Circulation; #assumes C4/Circulation
  
  #package to deal with circulation 
--- 1,5 ----
! package C4::Circulation;
! 
! # $Id$
  
  #package to deal with circulation 
***************
*** 126,129 ****
--- 128,132 ----
  
  # FIXME - This is quite similar to &C4::Circulation::Main::previousissue
+ # FIXME - Never used. Obsolete, presumably.
  sub previousissue {
    my ($env,$itemnum,$dbh,$bornum)address@hidden;
***************
*** 209,217 ****
    #scan barcode
    my ($number,$reason,$book)=&borrower_dialog($env); #C4::Interface
!   $number= $number;
    $book=uc $book;
    return ($number,$reason,$book);
  }
- 
- 
- END { }       # module clean-up code here (global destructor)
--- 212,217 ----
    #scan barcode
    my ($number,$reason,$book)=&borrower_dialog($env); #C4::Interface
!   $number= $number;           # FIXME - WTF?
    $book=uc $book;
    return ($number,$reason,$book);
  }




reply via email to

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