Bug 27266: (follow-up) Remove instances of GetMarcAuthors

[srvgit] / Koha / Account.pm

diff --git a/Koha/Account.pm b/Koha/Account.pm
index 47961df..5f4da3f 100644 (file)
--- a/Koha/Account.pm
+++ b/Koha/Account.pm
@@ -110,7 +110,7 @@ sub pay {
     }
 
     my $patron = Koha::Patrons->find( $self->{patron_id} );
-    my @account_offsets = $payment->debit_offsets->as_list;
+    my @account_offsets = $payment->credit_offsets({ type => 'APPLY' })->as_list;
     if ( C4::Context->preference('UseEmailReceipts') ) {
         if (
             my $letter = C4::Letters::GetPreparedLetter(