X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/687f2d9638182ead968d333af325c912d903b675..ae278b58747710a8c843a6bee9375186eafa17f7:/SL/Mailer.pm diff --git a/SL/Mailer.pm b/SL/Mailer.pm index 653685058..3805fb40c 100644 --- a/SL/Mailer.pm +++ b/SL/Mailer.pm @@ -38,6 +38,11 @@ use strict; my $num_sent = 0; +my %mail_delivery_modules = ( + sendmail => 'SL::Mailer::Sendmail', + smtp => 'SL::Mailer::SMTP', +); + sub new { my ($type, %params) = @_; my $self = { %params }; @@ -54,7 +59,7 @@ sub _create_driver { myconfig => \%::myconfig, ); - my $module = ($::lx_office_conf{mail_delivery}->{method} || 'smtp') ne 'smtp' ? 'SL::Mailer::Sendmail' : 'SL::Mailer::SMTP'; + my $module = $mail_delivery_modules{ $::lx_office_conf{mail_delivery}->{method} }; eval "require $module" or return undef; return $module->new(%params);