Adding a sprintf so fines show up to 2 decimal places

[koha_gimpoz] / members / member.pl

diff --git a/members/member.pl b/members/member.pl
index e01b4bf..85d3535 100755 (executable)
--- a/members/member.pl
+++ b/members/member.pl
@@ -28,7 +28,7 @@ use C4::Auth;
 use C4::Output;
 use C4::Interface::CGI::Output;
 use CGI;
-use C4::Search;
+use C4::Members;
 use HTML::Template;
 
 my $input = new CGI;
@@ -99,8 +99,11 @@ for (my $i=0; $i < $count; $i++){
         city => $results->[$i]{'city'},
         branchcode => $results->[$i]{'branchcode'},
         odissue => "$od/$issue",
-        fines => $fines,
-        borrowernotes => $results->[$i]{'borrowernotes'});
+        fines =>  sprintf("%.2f",$fines),
+        borrowernotes => $results->[$i]{'borrowernotes'},
+        sort1 => $results->[$i]{'sort1'},
+        sort2 => $results->[$i]{'sort2'},
+        );
   if ( $background ) { $background = 0; } else {$background = 1; }
   push(@resultsdata, \%row);
 }