|
Lines 54-59
if ( !$output_directory || !-d $output_directory || !-w $output_directory ) {
Link Here
|
| 54 |
-msg => qq{\nError: You must specify a valid and writeable directory to dump the print notices in.\n}, |
54 |
-msg => qq{\nError: You must specify a valid and writeable directory to dump the print notices in.\n}, |
| 55 |
}); |
55 |
}); |
| 56 |
} |
56 |
} |
|
|
57 |
my $sys_pref_emails = C4::Context->preference("SendPrintNoticesEmails"); |
| 58 |
if($sys_pref_emails) |
| 59 |
{ |
| 60 |
my @split_pref_emails = split(/,/, $sys_pref_emails); |
| 61 |
my $sys_pref_combine = C4::Context->preference("SendPrintNoticesCombineEmails"); |
| 62 |
if($sys_pref_combine) |
| 63 |
{ |
| 64 |
@emails = (@emails, @split_pref_emails); |
| 65 |
} |
| 66 |
else |
| 67 |
{ |
| 68 |
@emails = @split_pref_emails; |
| 69 |
} |
| 70 |
} |
| 71 |
else |
| 72 |
{ |
| 73 |
cronlogaction({info => "SendPrintNotices system pref ignored because it was null or empty."}); |
| 74 |
} |
| 75 |
|
| 76 |
# uncomment the line below to test the system pref even if you have no files to send |
| 77 |
# say $_ for @emails; |
| 57 |
|
78 |
|
| 58 |
# Default value is html |
79 |
# Default value is html |
| 59 |
$html = 1 if not $html and not $csv and not $ods; |
80 |
$html = 1 if not $html and not $csv and not $ods; |
| 60 |
- |
|
|