X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/20e572be4cd1345d7a8c0188535862f24ed2ed7f..c60cb1f08f:/bin/mozilla/io.pl

diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index a4ad06b9b..778c718f4 100644
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -1976,7 +1976,7 @@ 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} =~ m{^ purchase (?: _delivery)? _order $}x;
+  $email = '' if $::form->{type} eq 'purchase_delivery_order';
 
   my $email_form = {
     to                  => $email,