|
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 |
- |
|
|