From: Moritz Bunkus Date: Fri, 10 Feb 2017 12:54:11 +0000 (+0100) Subject: Testfehler: keine indirekte Objektnotation nutzen X-Git-Tag: release-3.5.4~1505 X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/commitdiff_plain/9b0245645097479fd4c9eed2957610b8af9895f2?ds=sidebyside Testfehler: keine indirekte Objektnotation nutzen --- diff --git a/SL/Mailer.pm b/SL/Mailer.pm index abc25f7ce..801c38d34 100644 --- a/SL/Mailer.pm +++ b/SL/Mailer.pm @@ -50,7 +50,7 @@ my %mail_delivery_modules = ( sub new { my ($type, %params) = @_; my $self = { %params }; - $parser = new MIME::Parser; + $parser = MIME::Parser->new; $parser->output_under("users"); bless $self, $type;