X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=opac%2Fopac-user.pl;h=750a9c34e953dff79e219b2ec044c4eaa3768859;hb=17b38f15a7d3e5d11c09b7c8fd95101f6180a5cc;hp=c5a7f5afe6f16527e364eb5e48bf89fc5be32426;hpb=ea17f17a0a93f6d1b7a92a345649746d5bdba002;p=koha.git diff --git a/opac/opac-user.pl b/opac/opac-user.pl index c5a7f5afe6..750a9c34e9 100755 --- a/opac/opac-user.pl +++ b/opac/opac-user.pl @@ -158,7 +158,7 @@ my $issues = GetPendingIssues($borrowernumber); if ($issues){ foreach my $issue ( sort { $b->{date_due}->datetime() cmp $a->{date_due}->datetime() } @{$issues} ) { # check for reserves - my ( $restype, $res, undef ) = CheckReserves( $issue->{'itemnumber'} ); + my $restype = GetReserveStatus( $issue->{'itemnumber'} ); if ( $restype ) { $issue->{'reserved'} = 1; } @@ -169,6 +169,8 @@ if ($issues){ if ( $ac->{'itemnumber'} == $issue->{'itemnumber'} ) { $charges += $ac->{'amountoutstanding'} if $ac->{'accounttype'} eq 'F'; + $charges += $ac->{'amountoutstanding'} + if $ac->{'accounttype'} eq 'FU'; $charges += $ac->{'amountoutstanding'} if $ac->{'accounttype'} eq 'L'; }