Lines 321-330
sub excessive_fees {
Link Here
|
321 |
my $self = shift; |
321 |
my $self = shift; |
322 |
return ($self->fee_amount and $self->fee_amount > $self->fee_limit); |
322 |
return ($self->fee_amount and $self->fee_amount > $self->fee_limit); |
323 |
} |
323 |
} |
|
|
324 |
|
324 |
sub excessive_fines { |
325 |
sub excessive_fines { |
325 |
my $self = shift; |
326 |
my $self = shift; |
326 |
return $self->excessive_fees; # excessive_fines is the same thing as excessive_fees for Koha |
327 |
return $self->excessive_fees; # excessive_fines is the same thing as excessive_fees for Koha |
327 |
} |
328 |
} |
|
|
329 |
|
330 |
sub holds_blocked_by_excessive_fees { |
331 |
return ( $self->fee_amount |
332 |
&& $self->fee_amount > C4::Context->preference("maxoutstanding") ); |
333 |
} |
328 |
|
334 |
|
329 |
sub library_name { |
335 |
sub library_name { |
330 |
my $self = shift; |
336 |
my $self = shift; |
331 |
- |
|
|