|
Lines 804-810
Unsuspends all suspended reserves with a suspend_until date from before today.
Link Here
|
| 804 |
sub AutoUnsuspendReserves { |
804 |
sub AutoUnsuspendReserves { |
| 805 |
my $today = dt_from_string(); |
805 |
my $today = dt_from_string(); |
| 806 |
|
806 |
|
| 807 |
my @holds = Koha::Holds->search( { suspend_until => { '<' => $today->ymd() } } ); |
807 |
my @holds = Koha::Holds->search( { suspend_until => { '<=' => $today->ymd() } } ); |
| 808 |
|
808 |
|
| 809 |
map { $_->suspend(0)->suspend_until(undef)->store() } @holds; |
809 |
map { $_->suspend(0)->suspend_until(undef)->store() } @holds; |
| 810 |
} |
810 |
} |
| 811 |
- |
|
|