projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Unnötige use und require in Pickern entfernt
[kivitendo-erp.git]
/
SL
/
Presenter
/
CustomerVendor.pm
diff --git
a/SL/Presenter/CustomerVendor.pm
b/SL/Presenter/CustomerVendor.pm
index
4a37029
..
9045cda
100644
(file)
--- a/
SL/Presenter/CustomerVendor.pm
+++ b/
SL/Presenter/CustomerVendor.pm
@@
-40,7
+40,7
@@
sub customer_vendor_picker {
my ($self, $name, $value, %params) = @_;
croak 'Unknown "type" parameter' unless $params{type} =~ m{^(?:customer|vendor)$};
my ($self, $name, $value, %params) = @_;
croak 'Unknown "type" parameter' unless $params{type} =~ m{^(?:customer|vendor)$};
- croak 'Unknown value class' if $value && (ref($value) !~ m{^SL::DB::(?: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';
if ($value && !ref $value) {
my $class = $params{type} eq 'customer' ? 'SL::DB::Manager::Customer' : 'SL::DB::Manager::Vendor';