[Koha-cvs] CVS: koha/C4/Circulation Circ2.pm,1.21.2.13,1.21.2.14
Steve Tonnesen
tonnesen at users.sourceforge.net
Thu Oct 24 22:10:59 CEST 2002
Update of /cvsroot/koha/koha/C4/Circulation
In directory usw-pr-cvs1:/tmp/cvs-serv10901
Modified Files:
Tag: rel-1-2
Circ2.pm
Log Message:
Removing ReserveWaiting from returnbook() pending further discussion.
Index: Circ2.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Circulation/Circ2.pm,v
retrieving revision 1.21.2.13
retrieving revision 1.21.2.14
diff -C2 -r1.21.2.13 -r1.21.2.14
*** Circ2.pm 24 Oct 2002 18:20:29 -0000 1.21.2.13
--- Circ2.pm 24 Oct 2002 20:10:48 -0000 1.21.2.14
***************
*** 1031,1035 ****
my ($resfound, $resrec) = CheckReserves($iteminformation->{'itemnumber'});
if ($resfound) {
! my $tobrcd = ReserveWaiting($resrec->{'itemnumber'}, $resrec->{'borrowernumber'});
$resrec->{'ResFound'} = $resfound;
$messages->{'ResFound'} = $resrec;
--- 1031,1035 ----
my ($resfound, $resrec) = CheckReserves($iteminformation->{'itemnumber'});
if ($resfound) {
! #my $tobrcd = ReserveWaiting($resrec->{'itemnumber'}, $resrec->{'borrowernumber'});
$resrec->{'ResFound'} = $resfound;
$messages->{'ResFound'} = $resrec;
***************
*** 1731,1735 ****
$sth1->finish;
# close FILE;
! return ($charge, $itemtype);
}
--- 1731,1735 ----
$sth1->finish;
# close FILE;
! return ($charge, $item_type);
}
More information about the Koha-cvs
mailing list