X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/d5440cc6f9cc5b2942458ce7480526e2b90b17a4..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();