Revision 166f3c75
Von Tamino Steinert vor mehr als 1 Jahr hinzugefügt
SL/Mailer/SMTP.pm | ||
---|---|---|
24 | 24 |
extended_status => 'no send attempt made', |
25 | 25 |
); |
26 | 26 |
|
27 |
my $cfg = $::lx_office_conf{mail_delivery} || {}; |
|
27 |
my $cfg = { |
|
28 |
host => $::instance_conf->get_mail_delivery_host, |
|
29 |
port => $::instance_conf->get_mail_delivery_port, |
|
30 |
login => $::instance_conf->get_mail_delivery_login, |
|
31 |
password => $::instance_conf->get_mail_delivery_password, |
|
32 |
security => $::instance_conf->get_mail_delivery_security, |
|
33 |
}; |
|
28 | 34 |
$self->{security} = exists $security_config{lc $cfg->{security}} ? lc $cfg->{security} : 'none'; |
29 | 35 |
my $sec_cfg = $security_config{ $self->{security} }; |
30 | 36 |
|
... | ... | |
46 | 52 |
}; |
47 | 53 |
} |
48 | 54 |
|
49 |
# Backwards compatibility: older Versions used 'user' instead of the |
|
50 |
# intended 'login'. Support both. |
|
51 |
my $login = $cfg->{login} || $cfg->{user}; |
|
52 |
|
|
55 |
my $login = $cfg->{login}; |
|
53 | 56 |
return 1 unless $login; |
54 | 57 |
|
55 | 58 |
if (!$self->{smtp}->auth($login, $cfg->{password})) { |
Auch abrufbar als: Unified diff
Mailer: nutze Mandantenkonfiguration