From: Sven Schöling <s.schoeling@linet-services.de>
Date: Tue, 10 Jul 2012 11:20:22 +0000 (+0200)
Subject: Initparameter für SL/Mailer
X-Git-Tag: release-3.0.0beta1~314
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=45c9cdd8f7a14868d35ad3b4f9afb36efa36a7b1;p=kivitendo-erp.git

Initparameter für SL/Mailer

Damit man das charset mitgeben kann.
---

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();