Revision 166f3c75
Von Tamino Steinert vor mehr als 1 Jahr hinzugefügt
| SL/Mailer.pm | ||
|---|---|---|
| 340 | 340 |
|
| 341 | 341 |
sub _store_in_imap_sent_folder {
|
| 342 | 342 |
my ($self, $email_as_string) = @_; |
| 343 |
my $config = $::lx_office_conf{sent_emails_in_imap} || {};
|
|
| 344 |
return unless ($config->{enabled} && $config->{hostname});
|
|
| 343 |
my $config = {
|
|
| 344 |
enabled => $::instance_conf->get_sent_emails_in_imap_enabled, |
|
| 345 |
hostname => $::instance_conf->get_sent_emails_in_imap_hostname, |
|
| 346 |
port => $::instance_conf->get_sent_emails_in_imap_port, |
|
| 347 |
ssl => $::instance_conf->get_sent_emails_in_imap_ssl, |
|
| 348 |
username => $::instance_conf->get_sent_emails_in_imap_username, |
|
| 349 |
password => $::instance_conf->get_sent_emails_in_imap_password, |
|
| 350 |
folder => $::instance_conf->get_sent_emails_in_imap_folder || 'Sent', |
|
| 351 |
}; |
|
| 352 |
return unless ($config->{enabled});
|
|
| 345 | 353 |
|
| 346 | 354 |
my $socket; |
| 347 | 355 |
if ($config->{ssl}) {
|
| ... | ... | |
| 374 | 382 |
}; |
| 375 | 383 |
|
| 376 | 384 |
my $separator = $imap->separator(); |
| 377 |
my $folder = $config->{folder} || 'INBOX/Sent';
|
|
| 385 |
my $folder = $config->{folder};
|
|
| 378 | 386 |
$folder =~ s|/|${separator}|g;
|
| 379 | 387 |
|
| 380 | 388 |
$imap->append_string($folder, $email_as_string) or do {
|
Auch abrufbar als: Unified diff
Mailer: nutze Mandantenkonfiguration