Bug 15177: TO_PROCESS notice for fr-FR

[koha-ffzg.git] / members / discharge.pl

diff --git a/members/discharge.pl b/members/discharge.pl
index 9c0fdef..ad8408b 100755 (executable)
--- a/members/discharge.pl
+++ b/members/discharge.pl
@@ -67,9 +67,8 @@ if ( $input->param('borrowernumber') ) {
 
     # Generating discharge if needed
     if ( $input->param('discharge') and $can_be_discharged ) {
-        my $is_discharged = Koha::Borrower::Discharge::count({
+        my $is_discharged = Koha::Borrower::Discharge::is_discharged({
             borrowernumber => $borrowernumber,
-            validated      => 1,
         });
         unless ($is_discharged) {
             Koha::Borrower::Discharge::discharge({
@@ -100,7 +99,7 @@ if ( $input->param('borrowernumber') ) {
 
     # Already generated discharges
     my $validated_discharges = Koha::Borrower::Discharge::get_validated({
-        branchcode => $data->{'branchcode'},
+        borrowernumber => $borrowernumber,
     });
 
     $template->param(