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

Andrew Arensburger arensb at users.sourceforge.net
Sun Oct 13 13:37:43 CEST 2002


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

Modified Files:
	Renewals2.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: Renewals2.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Circulation/Renewals2.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -r1.7 -r1.8
*** Renewals2.pm	13 Oct 2002 06:28:49 -0000	1.7
--- Renewals2.pm	13 Oct 2002 11:37:41 -0000	1.8
***************
*** 288,293 ****
      if (my$data2=$sth2->fetchrow_hashref) {
        my $discount = $data2->{'rentaldiscount'};
!       # FIXME - *=
!       $charge = ($charge *(100 - $discount)) / 100;
      }
      $sth2->finish;
--- 288,292 ----
      if (my$data2=$sth2->fetchrow_hashref) {
        my $discount = $data2->{'rentaldiscount'};
!       $charge *= (100 - $discount) / 100;
      }
      $sth2->finish;





More information about the Koha-cvs mailing list