X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/103d03fb414002f186353c48e41eeecd76d1e31d..c60cb1f08f:/bin/mozilla/io.pl diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl index 1fd47c877..778c718f4 100644 --- a/bin/mozilla/io.pl +++ b/bin/mozilla/io.pl @@ -1976,6 +1976,8 @@ sub show_sales_purchase_email_dialog { $email = SL::DB::Vendor ->load_cached($::form->{vc_id})->email if 'vendor' eq $::form->{vc}; } + $email = '' if $::form->{type} eq 'purchase_delivery_order'; + my $email_form = { to => $email, subject => $::form->generate_email_subject,