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

[Andrew Arensburger]

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

Modified Files:
	Format.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: Format.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Format.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -r1.7 -r1.8
*** Format.pm	13 Oct 2002 06:03:20 -0000	1.7
--- Format.pm	13 Oct 2002 11:34:59 -0000	1.8
***************
*** 214,222 ****
    # Right-pad the decimal part to the given number of digits.
    if ($right > 0) {
!      $tempdec = $tempdec.("0"x$right);	# FIXME - .=
       $tempdec = substr($tempdec,0,$right);
!      $fnumb = $fnumb.".".$tempdec;	# FIXME - .=
    }
!   return ($fnumb);	# FIXME - Shouldn't return a list.
  }
  
--- 214,222 ----
    # Right-pad the decimal part to the given number of digits.
    if ($right > 0) {
!      $tempdec .= "0"x$right;
       $tempdec = substr($tempdec,0,$right);
!      $fnumb .= ".".$tempdec;
    }
!   return $fnumb;	# FIXME - Shouldn't return a list.
  }