|
Lines 28-39
unless (@days) {
Link Here
|
| 28 |
|
28 |
|
| 29 |
unless ($confirm) { |
29 |
unless ($confirm) { |
| 30 |
say "Doing a dry run; no email will be sent."; |
30 |
say "Doing a dry run; no email will be sent."; |
| 31 |
say "Run again with --confirm to sent emails."; |
31 |
say "Run again with --confirm to send emails."; |
| 32 |
$verbose = 1 unless $verbose; |
32 |
$verbose = 1 unless $verbose; |
| 33 |
} |
33 |
} |
| 34 |
|
34 |
|
| 35 |
for my $number_of_days (@days) { |
35 |
for my $number_of_days (@days) { |
| 36 |
say "Searching suggestions suggested $number_of_days ago" if $verbose; |
36 |
say "Searching suggestions suggested $number_of_days days ago" if $verbose; |
| 37 |
|
37 |
|
| 38 |
my $suggestions = C4::Suggestions::GetUnprocessedSuggestions($number_of_days); |
38 |
my $suggestions = C4::Suggestions::GetUnprocessedSuggestions($number_of_days); |
| 39 |
|
39 |
|
| 40 |
- |
|
|