fine_items => ['Computer Time'],
recall_items => [],
unavail_holds => [],
- fee_items => [],
},
);
return [@{$self->{unavail_holds}}[$start-1 .. $end-1]];
}
-sub fee_items {
- my ($self, $start, $end) = @_;
-
- $start = 1 if !defined($start);
- $end = scalar @{$self->fee_items} if !defined($end);
-
- return @{$self->{fee_items}}[$start-1 .. $end-1];
-}
-
sub block {
my ($self, $card_retained, $blocked_card_msg) = @_;