[Koha-cvs] CVS: koha pay.pl,1.9,1.9.2.1

[Owen Leonard]

Update of /cvsroot/koha/koha
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14830

Modified Files:
      Tag: rel_2_2
	pay.pl 
Log Message:
Formatting currency values

Index: pay.pl
===================================================================
RCS file: /cvsroot/koha/koha/pay.pl,v
retrieving revision 1.9
retrieving revision 1.9.2.1
diff -C2 -r1.9 -r1.9.2.1
*** pay.pl	12 Jan 2004 16:58:20 -0000	1.9
--- pay.pl	16 Feb 2005 19:16:35 -0000	1.9.2.1
***************
*** 102,107 ****
  			$line{itemnumber} = $accts->[$i]{'itemnumber'};
  			$line{accounttype} = $accts->[$i]{'accounttype'};
! 			$line{amount} = $accts->[$i]{'amount'};
! 			$line{amountoutstanding} = $accts->[$i]{'amountoutstanding'};
  			$line{bornum} = $bornum;
  			$line{accountno} = $accts->[$i]{'accountno'};
--- 102,107 ----
  			$line{itemnumber} = $accts->[$i]{'itemnumber'};
  			$line{accounttype} = $accts->[$i]{'accounttype'};
! 			$line{amount} = sprintf("%.2f",$accts->[$i]{'amount'});
! 			$line{amountoutstanding} = sprintf("%.2f",$accts->[$i]{'amountoutstanding'});
  			$line{bornum} = $bornum;
  			$line{accountno} = $accts->[$i]{'accountno'};
***************
*** 115,119 ****
  							bornum => $bornum,
  							loop_pay => \@loop_pay,
! 							total => $total);
  	print "Content-Type: text/html\n\n", $template->output;
  
--- 115,119 ----
  							bornum => $bornum,
  							loop_pay => \@loop_pay,
! 							total => sprintf("%.2f",$total));
  	print "Content-Type: text/html\n\n", $template->output;