From 45c9cdd8f7a14868d35ad3b4f9afb36efa36a7b1 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Sven=20Sch=C3=B6ling?= Date: Tue, 10 Jul 2012 13:20:22 +0200 Subject: [PATCH] =?utf8?q?Initparameter=20f=C3=BCr=20SL/Mailer?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Damit man das charset mitgeben kann. --- SL/Mailer.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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(); -- 2.20.1