[Koha-cvs] CVS: koha/C4/Circulation Circ2.pm,1.45,1.46

Andrew Arensburger arensb at users.sourceforge.net
Sun Oct 13 13:36:48 CEST 2002


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

Modified Files:
	Circ2.pm 
Log Message:
Replaced expressions of the form "$x = $x <op> $y" with "$x <op>= $y".
Thus, $x = $x+2 becomes $x += 2, and so forth.


Index: Circ2.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Circulation/Circ2.pm,v
retrieving revision 1.45
retrieving revision 1.46
diff -C2 -r1.45 -r1.46
*** Circ2.pm	13 Oct 2002 06:15:08 -0000	1.45
--- Circ2.pm	13 Oct 2002 11:36:46 -0000	1.46
***************
*** 1108,1113 ****
  		if ($accdata->{'amountoutstanding'} < $amountleft) {
  		    $newamtos = 0;
! 		    # FIXME - -=
! 		    $amountleft = $amountleft - $accdata->{'amountoutstanding'};
  		}  else {
  		    $newamtos = $accdata->{'amountoutstanding'} - $amountleft;
--- 1108,1112 ----
  		if ($accdata->{'amountoutstanding'} < $amountleft) {
  		    $newamtos = 0;
! 		    $amountleft -= $accdata->{'amountoutstanding'};
  		}  else {
  		    $newamtos = $accdata->{'amountoutstanding'} - $amountleft;
***************
*** 1570,1575 ****
    my $total=0;
    while (my $data=$sth->fetchrow_hashref){
!     # FIXME = +=
!     $total=$total+$data->{'sum(amountoutstanding)'};
    }
    $sth->finish;
--- 1569,1573 ----
    my $total=0;
    while (my $data=$sth->fetchrow_hashref){
!     $total += $data->{'sum(amountoutstanding)'};
    }
    $sth->finish;





More information about the Koha-cvs mailing list