Lines 224-230
sub CalcFine {
Link Here
|
224 |
|
224 |
|
225 |
# Call the plugin hook overwrite_calc_fine of all plugins and return |
225 |
# Call the plugin hook overwrite_calc_fine of all plugins and return |
226 |
# the first defined fine. |
226 |
# the first defined fine. |
227 |
my @fines = Koha::Plugins->call( |
227 |
my @fines = grep { defined $_ } Koha::Plugins->call( |
228 |
'overwrite_calc_fine', |
228 |
'overwrite_calc_fine', |
229 |
{ |
229 |
{ |
230 |
itemnumber => $item->{itemnumber}, |
230 |
itemnumber => $item->{itemnumber}, |
Lines 234-242
sub CalcFine {
Link Here
|
234 |
end_date => $end_date, |
234 |
end_date => $end_date, |
235 |
} |
235 |
} |
236 |
); |
236 |
); |
237 |
foreach my $fine (@fines) { |
237 |
|
238 |
return @$fine if ( defined $fine ); |
238 |
return @{ $fines[0] } |
239 |
} |
239 |
if scalar @fines; |
240 |
|
240 |
|
241 |
my $start_date = $due_dt->clone(); |
241 |
my $start_date = $due_dt->clone(); |
242 |
|
242 |
|
243 |
- |
|
|