Lines 24-29
use Carp;
Link Here
|
24 |
use DateTime; |
24 |
use DateTime; |
25 |
use Try::Tiny; |
25 |
use Try::Tiny; |
26 |
|
26 |
|
|
|
27 |
use C4::Circulation qw(MarkIssueReturned); |
27 |
use Koha::Checkouts::ReturnClaims; |
28 |
use Koha::Checkouts::ReturnClaims; |
28 |
use Koha::Database; |
29 |
use Koha::Database; |
29 |
use Koha::DateUtils; |
30 |
use Koha::DateUtils; |
Lines 175-181
sub claim_returned {
Link Here
|
175 |
$ClaimReturnedChargeFee eq 'charge' ? 1 |
176 |
$ClaimReturnedChargeFee eq 'charge' ? 1 |
176 |
: $ClaimReturnedChargeFee eq 'no_charge' ? 0 |
177 |
: $ClaimReturnedChargeFee eq 'no_charge' ? 0 |
177 |
: $charge_lost_fee; # $ClaimReturnedChargeFee eq 'ask' |
178 |
: $charge_lost_fee; # $ClaimReturnedChargeFee eq 'ask' |
178 |
C4::Circulation::LostItem( $self->itemnumber, 'claim_returned' ) if $charge_lost_fee; |
179 |
|
|
|
180 |
if ( $charge_lost_fee ) { |
181 |
C4::Circulation::LostItem( $self->itemnumber, 'claim_returned' ); |
182 |
} |
183 |
elsif ( C4::Context->preference( 'MarkLostItemsAsReturned' ) =~ m/claim_returned/ ) { |
184 |
C4::Circulation::MarkIssueReturned( $self->borrowernumber, $self->itemnumber, undef, $self->patron->privacy ); |
185 |
} |
179 |
|
186 |
|
180 |
return $claim; |
187 |
return $claim; |
181 |
} |
188 |
} |
182 |
- |
|
|