Lines 357-369
sub SendAlerts {
Link Here
|
357 |
$mail->text_body( $letter->{content} ); |
357 |
$mail->text_body( $letter->{content} ); |
358 |
} |
358 |
} |
359 |
|
359 |
|
|
|
360 |
my $error; |
360 |
try { |
361 |
try { |
361 |
$mail->send_or_die({ transport => $library->smtp_server->transport }); |
362 |
$mail->send_or_die({ transport => $library->smtp_server->transport }); |
362 |
} |
363 |
} |
363 |
catch { |
364 |
catch { |
364 |
carp "$_"; |
365 |
carp "$_"; |
365 |
return { error => "$_" }; |
366 |
$error = $_; |
366 |
}; |
367 |
}; |
|
|
368 |
return { error => $error } if $error; |
367 |
} |
369 |
} |
368 |
} |
370 |
} |
369 |
elsif ( $type eq 'claimacquisition' or $type eq 'claimissues' or $type eq 'orderacquisition' ) { |
371 |
elsif ( $type eq 'claimacquisition' or $type eq 'claimissues' or $type eq 'orderacquisition' ) { |
Lines 511-523
sub SendAlerts {
Link Here
|
511 |
$mail->text_body( "" . $letter->{content} ); |
513 |
$mail->text_body( "" . $letter->{content} ); |
512 |
} |
514 |
} |
513 |
|
515 |
|
|
|
516 |
my $error; |
514 |
try { |
517 |
try { |
515 |
$mail->send_or_die({ transport => $library->smtp_server->transport }); |
518 |
$mail->send_or_die({ transport => $library->smtp_server->transport }); |
516 |
} |
519 |
} |
517 |
catch { |
520 |
catch { |
518 |
carp "$_"; |
521 |
carp "$_"; |
519 |
return { error => "$_" }; |
522 |
$error = $_; |
520 |
}; |
523 |
}; |
|
|
524 |
return { error => $error } if $error; |
521 |
|
525 |
|
522 |
logaction( |
526 |
logaction( |
523 |
"ACQUISITION", |
527 |
"ACQUISITION", |
524 |
- |
|
|