Merge remote branch 'kc/master' into new/bug_3013

[koha_gimpoz] / circ / returns.pl

diff --git a/circ/returns.pl b/circ/returns.pl
index 2aac76a..c05277c 100755 (executable)
--- a/circ/returns.pl
+++ b/circ/returns.pl
@@ -241,6 +241,13 @@ if ($barcode) {
         $input{duedate}        = $duedate;
         $input{return_overdue} = 1 if ($duedate and $duedate lt $today->output('iso'));
         push( @inputloop, \%input );
+
+        my ( $od, $issue, $fines ) = GetMemberIssuesAndFines( $borrower->{'borrowernumber'} );
+        if ($fines) {
+            $template->param( fines => sprintf("%.2f",$fines) );
+            $template->param( fineborrowernumber => $borrower->{'borrowernumber'} );
+        }
+
     }
     elsif ( !$messages->{'BadBarcode'} ) {
         $input{duedate}   = 0;