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

(-)a/C4/ILSDI/Services.pm (-6 / +1 lines)
Lines 425-435 sub GetPatronInfo { Link Here
425
425
426
    # Fines management
426
    # Fines management
427
    if ( $cgi->param('show_fines') && $cgi->param('show_fines') eq "1" ) {
427
    if ( $cgi->param('show_fines') && $cgi->param('show_fines') eq "1" ) {
428
428
        $borrower->{fines}{fine} = $patron->account->lines->unblessed;
429
        my $account_lines = $patron->account->lines;
430
        while (my $line = $account_lines->next ) {
431
            push @{ $borrower->{fines}{fine} }, $line->unblessed;
432
        }
433
    }
429
    }
434
430
435
    # Reserves management
431
    # Reserves management
436
- 

Return to bug 21681