X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/f16c552035ab973a9aed4a1dc29d0e16be7ff541..7bc44f0f59f35d7d3b555e98ff9bb61c8ffbea0b:/SL/Presenter/CustomerVendor.pm diff --git a/SL/Presenter/CustomerVendor.pm b/SL/Presenter/CustomerVendor.pm index 2bf5ebc3c..5f41a2a50 100644 --- a/SL/Presenter/CustomerVendor.pm +++ b/SL/Presenter/CustomerVendor.pm @@ -39,7 +39,14 @@ sub _customer_vendor { sub customer_vendor_picker { my ($self, $name, $value, %params) = @_; - $value = SL::DB::Manager::Customer->find_by(id => $value) if $value && !ref $value; + croak 'Unknown "type" parameter' unless $params{type} =~ m{^(?:customer|vendor)$}; + croak 'Unknown value class' if $value && ref($value) && (ref($value) !~ m{^SL::DB::(?:Customer|Vendor)$}); + + if ($value && !ref $value) { + my $class = $params{type} eq 'customer' ? 'SL::DB::Manager::Customer' : 'SL::DB::Manager::Vendor'; + $value = $class->find_by(id => $value); + } + my $id = delete($params{id}) || $self->name_to_id($name); my $fat_set_item = delete $params{fat_set_item}; @@ -50,8 +57,9 @@ sub customer_vendor_picker { my $ret = $self->input_tag($name, (ref $value && $value->can('id') ? $value->id : ''), class => "@classes", type => 'hidden', id => $id) . join('', map { $params{$_} ? $self->input_tag("", delete $params{$_}, id => "${id}_${_}", type => 'hidden') : '' } qw(type)) . - $self->input_tag("", (ref $value && $value->can('name')) ? $value->name : '', id => "${id}_name", %params); + $self->input_tag("", ref $value ? $value->displayable_name : '', id => "${id}_name", %params); + $::request->layout->add_javascripts('autocomplete_customer.js'); $::request->presenter->need_reinit_widgets($id); $self->html_tag('span', $ret, class => 'customer_vendor_picker');