Lines 833-839
sub CancelExpiredReserves {
Link Here
|
833 |
|
833 |
|
834 |
my $dtf = Koha::Database->new->schema->storage->datetime_parser; |
834 |
my $dtf = Koha::Database->new->schema->storage->datetime_parser; |
835 |
my $params = { expirationdate => { '<', $dtf->format_date($today) } }; |
835 |
my $params = { expirationdate => { '<', $dtf->format_date($today) } }; |
836 |
$params->{found} = undef unless $expireWaiting; |
836 |
$params->{found} = [ { '!=', 'W' }, undef ] unless $expireWaiting; |
837 |
|
837 |
|
838 |
# FIXME To move to Koha::Holds->search_expired (?) |
838 |
# FIXME To move to Koha::Holds->search_expired (?) |
839 |
my $holds = Koha::Holds->search( $params ); |
839 |
my $holds = Koha::Holds->search( $params ); |
840 |
- |
|
|