X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/d18df453f55190d4807af324725ea82a8835d7fc..11da4a00c2c8b1148634a368ec7170b19e7ba0ab:/SL/Mailer.pm diff --git a/SL/Mailer.pm b/SL/Mailer.pm index c4cea35f2..edd0eecda 100644 --- a/SL/Mailer.pm +++ b/SL/Mailer.pm @@ -44,8 +44,8 @@ my $num_sent = 0; sub new { $main::lxdebug->enter_sub(); - my ($type) = @_; - my $self = {}; + my ($type, %params) = @_; + my $self = { %params }; $main::lxdebug->leave_sub();