|
Lines 525-531
sub SendAlerts {
Link Here
|
| 525 |
my $emailsTo = join( ',', @email); |
525 |
my $emailsTo = join( ',', @email); |
| 526 |
my $emailsCC = join( ',', @cc); |
526 |
my $emailsCC = join( ',', @cc); |
| 527 |
my $sendAllEmailsTo = C4::Context->preference('SendAllEmailsTo'); |
527 |
my $sendAllEmailsTo = C4::Context->preference('SendAllEmailsTo'); |
| 528 |
# some validation. This could be improved. |
|
|
| 529 |
if ($sendAllEmailsTo && Email::Valid->address($sendAllEmailsTo) ) { |
528 |
if ($sendAllEmailsTo && Email::Valid->address($sendAllEmailsTo) ) { |
| 530 |
$emailsTo = $sendAllEmailsTo; |
529 |
$emailsTo = $sendAllEmailsTo; |
| 531 |
$emailsCC = ''; |
530 |
$emailsCC = ''; |