X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/ba802064109d19f3488e5555ec04491681e37b51..517788eec8228937e5182d95372019a962cf6dc6:/bin/mozilla/io.pl?ds=sidebyside diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl index dc05f3655..e8af23f7c 100644 --- a/bin/mozilla/io.pl +++ b/bin/mozilla/io.pl @@ -1000,6 +1000,11 @@ sub edit_e_mail { $form->{oldmedia} = $form->{media}; $form->{media} = "email"; + my $defaults = + my $global_bcc = AM->get_defaults()->{global_bcc}; + + $form->{bcc} = join ', ', grep $_, $form->{bcc}, $global_bcc; + my $attachment_filename = $form->generate_attachment_filename(); my $subject = $form->{subject} || $form->generate_email_subject();