X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/32b9234509522f36795001a5298c19e3315cd2a5..6010f8bfd99c2231fa9a0d278b796a02005a8c8d:/SL/OE.pm diff --git a/SL/OE.pm b/SL/OE.pm index 16ce8c164..aaaef1646 100644 --- a/SL/OE.pm +++ b/SL/OE.pm @@ -538,7 +538,7 @@ sub save { # force new project, if not set yet if ($::instance_conf->get_order_always_project && !$form->{"globalproject_id"} && ($form->{type} eq 'sales_order')) { require SL::DB::Customer; - my $customer = SL::DB::Manager::Customer->find_by( id => $form->{customer_id} ); + my $customer = SL::DB::Manager::Customer->find_by(id => $form->{customer_id}); die "Can't find customer" unless $customer; my $new_project = SL::DB::Project->new( projectnumber => $form->{ordnumber},