From b20a83a95237c1e7802858e1f2324ebd804e0580 Mon Sep 17 00:00:00 2001
From: oleonard <oleonard>
Date: Fri, 15 Jul 2005 20:09:19 +0000
Subject: [PATCH] Formatting fine amount to two decimal places

---
 members/moremember.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/members/moremember.pl b/members/moremember.pl
index 56c7a0cb14..37d14cc034 100755
--- a/members/moremember.pl
+++ b/members/moremember.pl
@@ -161,7 +161,7 @@ for (my $i=0;$i<$count;$i++){
 	# charge, for that matter).
 	my ($charge,$itemtype)=calc_charges($dbh,$issue->[$i]{'itemnumber'},$bornum);
 	$row{'itemtype'}=&ItemType($itemtype);
-	$row{'charge'}=$charge;
+	$row{'charge'}= sprintf("%.2f",$charge);
 
 	#check item is not reserved
 	my ($restype,$reserves)=CheckReserves($issue->[$i]{'itemnumber'});
-- 
2.39.5