|
Lines 38-44
my $command_line_options = join(" ",@ARGV);
Link Here
|
| 38 |
|
38 |
|
| 39 |
cronlogaction({ info => $command_line_options }); |
39 |
cronlogaction({ info => $command_line_options }); |
| 40 |
|
40 |
|
| 41 |
my $recalls = Koha::Recalls->search({ status => 'R' }); |
41 |
my $recalls = Koha::Recalls->search({ status => 'requested' }); |
| 42 |
while( my $recall = $recalls->next ) { |
42 |
while( my $recall = $recalls->next ) { |
| 43 |
if ( $recall->should_be_overdue ){ |
43 |
if ( $recall->should_be_overdue ){ |
| 44 |
$recall->set_overdue({ interface => 'COMMANDLINE' }); |
44 |
$recall->set_overdue({ interface => 'COMMANDLINE' }); |
| 45 |
- |
|
|