View | Details | Raw Unified | Return to bug 21673
Collapse All | Expand All

(-)a/Koha/Account/Lines.pm (-1 lines)
Lines 18-24 package Koha::Account::Lines; Link Here
18
use Modern::Perl;
18
use Modern::Perl;
19
19
20
use Carp;
20
use Carp;
21
use List::Util qw( sum0 );
22
21
23
use Koha::Database;
22
use Koha::Database;
24
use Koha::Account::Line;
23
use Koha::Account::Line;
(-)a/opac/opac-user.pl (-2 / +1 lines)
Lines 208-214 if ( $pending_checkouts->count ) { # Useless test Link Here
208
                itemnumber        => $issue->{itemnumber}
208
                itemnumber        => $issue->{itemnumber}
209
            }
209
            }
210
        );
210
        );
211
        $issue->{rentalfines} = $rental_fines->total_outstanding
211
        $issue->{rentalfines} = $rental_fines->total_outstanding;
212
212
213
        my $marcrecord = GetMarcBiblio({ biblionumber => $issue->{'biblionumber'} });
213
        my $marcrecord = GetMarcBiblio({ biblionumber => $issue->{'biblionumber'} });
214
        $issue->{'subtitle'} = GetRecordValue('subtitle', $marcrecord, GetFrameworkCode($issue->{'biblionumber'}));
214
        $issue->{'subtitle'} = GetRecordValue('subtitle', $marcrecord, GetFrameworkCode($issue->{'biblionumber'}));
215
- 

Return to bug 21673