X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/2d7e4203055156dccb2ca3fba82bbb32873ecd2e..4ad8ecea0ba37ba748bb16b347a097e407c864d7:/SL/DB/PartsGroup.pm diff --git a/SL/DB/PartsGroup.pm b/SL/DB/PartsGroup.pm index f81e977a1..f40c5de96 100644 --- a/SL/DB/PartsGroup.pm +++ b/SL/DB/PartsGroup.pm @@ -6,10 +6,21 @@ package SL::DB::PartsGroup; use strict; use SL::DB::MetaSetup::PartsGroup; +use SL::DB::Manager::PartsGroup; + +__PACKAGE__->meta->add_relationship( + custom_variable_configs => { + type => 'many to many', + map_class => 'SL::DB::CustomVariableConfigPartsgroup', + }, +); __PACKAGE__->meta->initialize; -# Creates get_all, get_all_count, get_all_iterator, delete_all and update_all. -__PACKAGE__->meta->make_manager_class; +sub displayable_name { + my $self = shift; + + return join ' ', grep $_, $self->id, $self->partsgroup; +} 1;