From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Wed, 18 Apr 2007 12:53:12 +0000 (+0000)
Subject: Beim Verschicken von Emails auch die Variable $form->{EMAIL_RECIPIENT} als Empfaenger... 
X-Git-Tag: release-2.4.3^2~494
X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/commitdiff_plain/a63aaabd1fc1e72db9a746e81f62f3703d9985db?ds=inline

Beim Verschicken von Emails auch die Variable $form->{EMAIL_RECIPIENT} als Empfaenger benutzen, falls in $form->{email} z.B. die Emailadresse des Kunden steht. Bei der Sammelrechnung genau deswegen $form->{EMAIL_RECIPIENT} benutzen.
---

diff --git a/SL/Form.pm b/SL/Form.pm
index 928d75fa3..4f4a48d0e 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -796,7 +796,7 @@ sub parse_template {
 
       map { $mail->{$_} = $self->{$_} }
         qw(cc bcc subject message version format charset);
-      $mail->{to}     = qq|$self->{email}|;
+      $mail->{to} = $self->{EMAIL_RECIPIENT} ? $self->{EMAIL_RECIPIENT} : $self->{email};
       $mail->{from}   = qq|"$myconfig->{name}" <$myconfig->{email}>|;
       $mail->{fileid} = "$fileid.";
       $myconfig->{signature} =~ s/\\r\\n/\\n/g;
diff --git a/bin/mozilla/rp.pl b/bin/mozilla/rp.pl
index 848ec62ba..8156df08d 100644
--- a/bin/mozilla/rp.pl
+++ b/bin/mozilla/rp.pl
@@ -2018,6 +2018,9 @@ sub print_form {
     $form->{IN} =~ s/html$/tex/;
   }
 
+  # Save $form->{email} because it will be overwritten.
+  $form->{EMAIL_RECIPIENT} = $form->{email};
+
   $i = 0;
   while (@{ $form->{AG} }) {