X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/508801bbaf7b9c5e144bf7ab9763a342ab80f176..2b8804456d1d3ee249a70d98679ea3a934b25a39:/SL/DB/Business.pm diff --git a/SL/DB/Business.pm b/SL/DB/Business.pm index 1fea0ef81..25a553656 100644 --- a/SL/DB/Business.pm +++ b/SL/DB/Business.pm @@ -5,6 +5,8 @@ use strict; use SL::DB::MetaSetup::Business; use SL::DB::Manager::Business; +__PACKAGE__->meta->initialize; + sub validate { my ($self) = @_; @@ -16,4 +18,10 @@ sub validate { return @errors; } +sub displayable_name { + my $self = shift; + + return join ' ', grep $_, $self->id, $self->description; +} + 1;