Revision 893edfe4
Von Bernd Bleßmann vor mehr als 2 Jahren hinzugefügt
SL/Form.pm | ||
---|---|---|
1014 | 1014 |
$mail->{message} .= $full_signature; |
1015 | 1015 |
$self->{emailerr} = $mail->send(); |
1016 | 1016 |
|
1017 |
if ($self->{emailerr}) { |
|
1018 |
$self->cleanup; |
|
1019 |
$self->error($::locale->text('The email was not sent due to the following error: #1.', $self->{emailerr})); |
|
1020 |
} |
|
1021 |
|
|
1022 | 1017 |
$self->{email_journal_id} = $mail->{journalentry}; |
1023 | 1018 |
$self->{snumbers} = "emailjournal" . "_" . $self->{email_journal_id}; |
1024 | 1019 |
$self->{what_done} = $::form->{type}; |
1025 | 1020 |
$self->{addition} = "MAILED"; |
1026 | 1021 |
$self->save_history; |
1027 | 1022 |
|
1023 |
if ($self->{emailerr}) { |
|
1024 |
$self->cleanup; |
|
1025 |
$self->error($::locale->text('The email was not sent due to the following error: #1.', $self->{emailerr})); |
|
1026 |
} |
|
1027 |
|
|
1028 | 1028 |
#write back for message info and mail journal |
1029 | 1029 |
$self->{cc} = $mail->{cc}; |
1030 | 1030 |
$self->{bcc} = $mail->{bcc}; |
Auch abrufbar als: Unified diff
SL::Form::send_email: History auch im Fehlerfall schreiben.
Da sowohl E-Mail-Journal als auch verknüpfte Belege den fehlgeschlagenen
Sendeversuch anzeigen, sollte der auch in der Historie sein.
ToDo: evtl. könnte das im Fehlerfall anders gekennzeichnet werden.