[Top][All Lists]
[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);
}
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/C4 Circulation.pm,1.6,1.7,
Andrew Arensburger <=