- $headers .= sprintf("%s: %s\n", ucfirst($item), $addr_obj->format()) unless $driver->keep_from_header($item);
- }
- }
-
- $headers .= sprintf("Subject: %s\n", $self->mime_quote_text($self->recode($self->{subject}), 60));
-
- $driver->start_mail(from => $self->{from}, to => [ map { @{ $addresses{$_} } } qw(to cc bcc) ]);
-
- $driver->print(qq|${headers}Message-ID: <$msgid>
-X-Mailer: kivitendo $self->{version}
-MIME-Version: 1.0
-|);
-
- if ($self->{attachments}) {
- $driver->print(qq|Content-Type: multipart/mixed; boundary="$boundary"\n\n|);
- if ($self->{message}) {
- $driver->print(qq|--${boundary}
-Content-Type: $self->{contenttype}; charset="$self->{charset}"
-
-| . $self->recode($self->{message}) . qq|
-
-|);