X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=inline;f=SL%2FForm.pm;h=fa2a83542b006e3650017fd09b42b3dd011ce423;hb=7070f3a0b8267b58ee39b7b0a524a97951ae64a9;hp=f29c60128eb2fe7213adb344baad233ad6f73792;hpb=8ec984acf7c46bde9a1da0e060503218e33e5b25;p=kivitendo-erp.git

diff --git a/SL/Form.pm b/SL/Form.pm
index f29c60128..fa2a83542 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -1199,7 +1199,12 @@ sub send_email {
   $mail->{message}  =~ s/\r//g;
   $mail->{message} .= $full_signature;
   $self->{emailerr} = $mail->send();
-  # $self->error($self->cleanup . "$err") if $self->{emailerr};
+
+  if ($self->{emailerr}) {
+    $self->cleanup;
+    $self->error($::locale->text('The email was not sent due to the following error: #1.', $self->{emailerr}));
+  }
+
   $self->{email_journal_id} = $mail->{journalentry};
   $self->{snumbers}  = "emailjournal" . "_" . $self->{email_journal_id};
   $self->{what_done} = $::form->{type};