X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/16df30aaca2c8d4173f1ea76be206ef5a23e69c9..refs/heads/b-3.3.0:/SL/Mailer/SMTP.pm

diff --git a/SL/Mailer/SMTP.pm b/SL/Mailer/SMTP.pm
index 8012a04cd..38ad2b753 100644
--- a/SL/Mailer/SMTP.pm
+++ b/SL/Mailer/SMTP.pm
@@ -31,9 +31,13 @@ sub init {
 
   $self->{smtp}->starttls(SSL_verify_mode => 0) || die if $self->{security} eq 'tls';
 
-  return 1 unless $cfg->{login};
+  # Backwards compatibility: older Versions used 'user' instead of the
+  # intended 'login'. Support both.
+  my $login = $cfg->{login} || $cfg->{user};
 
-  $self->{smtp}->auth($cfg->{user}, $cfg->{password}) or die;
+  return 1 unless $login;
+
+  $self->{smtp}->auth($login, $cfg->{password}) or die;
 }
 
 sub start_mail {