From: Bernd Bleßmann Date: Mon, 29 Apr 2013 07:51:23 +0000 (+0200) Subject: FlattenToForm: employee und salesman enden mit Unterstrich in der Form. X-Git-Tag: release-3.1.0beta1~450 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=ff9eb0dccc298f1fe521c0bebc69de812bcc40ea;p=kivitendo-erp.git FlattenToForm: employee und salesman enden mit Unterstrich in der Form. Behebt #2235. --- diff --git a/SL/DB/Helper/FlattenToForm.pm b/SL/DB/Helper/FlattenToForm.pm index 5af4bc3b1..ff279cde0 100644 --- a/SL/DB/Helper/FlattenToForm.pm +++ b/SL/DB/Helper/FlattenToForm.pm @@ -39,8 +39,8 @@ sub flatten_to_form { _copy($self->contact, $form, '', '', 0, grep { /^cp_/ } map { $_->name } SL::DB::Contact->meta->columns) if _has($self, 'cp_id'); _copy($self->shipto, $form, '', '', 0, grep { /^shipto/ } map { $_->name } SL::DB::Shipto->meta->columns) if _has($self, 'shipto_id'); _copy($self->globalproject, $form, 'globalproject', '', 0, qw(number description)) if _has($self, 'globalproject_id'); - _copy($self->employee, $form, 'employee', '', 0, map { $_->name } SL::DB::Employee->meta->columns) if _has($self, 'employee_id'); - _copy($self->salesman, $form, 'salesman', '', 0, map { $_->name } SL::DB::Employee->meta->columns) if _has($self, 'salesman_id'); + _copy($self->employee, $form, 'employee_', '', 0, map { $_->name } SL::DB::Employee->meta->columns) if _has($self, 'employee_id'); + _copy($self->salesman, $form, 'salesman_', '', 0, map { $_->name } SL::DB::Employee->meta->columns) if _has($self, 'salesman_id'); _copy($self->acceptance_confirmed_by, $form, 'acceptance_confirmed_by_', '', 0, map { $_->name } SL::DB::Employee->meta->columns) if _has($self, 'acceptance_confirmed_by_id'); $form->{employee} = $self->employee->name if _has($self, 'employee_id');