X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FUnit.pm;h=b133d8f131263cf39e3dea9c4b7da4827cf97c7b;hb=843de7839af752ec61b80616aaca6af5aadbf7fc;hp=55a190b247635c59ce0141e48d4feb5134083001;hpb=e055700faea1906bea6c03184ba4516b57cac887;p=kivitendo-erp.git diff --git a/SL/DB/Unit.pm b/SL/DB/Unit.pm index 55a190b24..b133d8f13 100644 --- a/SL/DB/Unit.pm +++ b/SL/DB/Unit.pm @@ -1,18 +1,14 @@ -# This file has been auto-generated only because it didn't exist. -# Feel free to modify it at will; it will not be overwritten automatically. - package SL::DB::Unit; use strict; use SL::DB::MetaSetup::Unit; - -# Creates get_all, get_all_count, get_all_iterator, delete_all and update_all. -__PACKAGE__->meta->make_manager_class; +use SL::DB::Manager::Unit; +use SL::DB::Helper::ActsAsList; __PACKAGE__->meta->add_relationships( base => { - type => 'one to one', + type => 'many to one', class => 'SL::DB::Unit', column_map => { base_unit => 'name' }, }, @@ -31,10 +27,12 @@ sub unit_class { sub convertible_units { my $self = shift; + my $all_units = scalar(@_) && (ref($_[0]) eq 'ARRAY') ? $_[0] : \@_; + $all_units = SL::DB::Manager::Unit->get_all if !@{ $all_units }; return [ sort { $a->sortkey <=> $b->sortkey } grep { $_->unit_class->name eq $self->unit_class->name } - @{ SL::DB::Manager::Unit->get_all } + @{ $all_units } ]; }