@@ -, +, @@ --- C4/Circulation.pm | 5 ++--- Koha/Item.pm | 1 + 2 files changed, 3 insertions(+), 3 deletions(-) --- a/C4/Circulation.pm +++ a/C4/Circulation.pm @@ -2014,14 +2014,13 @@ sub AddReturn { my $item_was_lost = $item->itemlost; my $leave_item_lost = C4::Context->preference("BlockReturnOfLostItems") ? 1 : 0; - ModDateLastSeen( $item->itemnumber, $leave_item_lost ); # will unset itemlost if needed + my $updated_item = ModDateLastSeen( $item->itemnumber, $leave_item_lost ); # will unset itemlost if needed # fix up the accounts..... if ( $item_was_lost ) { $messages->{'WasLost'} = 1; unless ( C4::Context->preference("BlockReturnOfLostItems") ) { - #my $refunded = Koha::Account::Lines->search{(itemnumber => $item->itemnumber, type => 'LOST_FOUND', # FIXME which other parameters to know it has been refunded? - $messages->{'LostItemFeeRefunded'} = 1; + $messages->{'LostItemFeeRefunded'} = $updated_item->{_refunded}; } } --- a/Koha/Item.pm +++ a/Koha/Item.pm @@ -871,6 +871,7 @@ sub _set_found_trigger { ); $credit->apply( { debits => [$accountline] } ); + $self->{_refunded} = 1; } # Update the account status --