X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/9e152755a340c813514eb132de27349ae7a9e028..dfb76ebf04df9aed8ba63d7b51bc558d2928030e:/SL/DB/Customer.pm?ds=inline

diff --git a/SL/DB/Customer.pm b/SL/DB/Customer.pm
index f2893ae74..f9f890167 100644
--- a/SL/DB/Customer.pm
+++ b/SL/DB/Customer.pm
@@ -5,6 +5,10 @@ use strict;
 use SL::DB::MetaSetup::Customer;
 use SL::DB::Manager::Customer;
 use SL::DB::Helper::TransNumberGenerator;
+use SL::DB::Helper::CustomVariables (
+  module      => 'CT',
+  cvars_alias => 1,
+);
 
 use SL::DB::VC;
 
@@ -29,7 +33,6 @@ __PACKAGE__->meta->add_relationship(
   },
 );
 
-__PACKAGE__->meta->make_manager_class;
 __PACKAGE__->meta->initialize;
 
 __PACKAGE__->before_save('_before_save_set_customernumber');
@@ -47,4 +50,10 @@ sub short_address {
   return join ', ', grep { $_ } $self->street, $self->zipcode, $self->city;
 }
 
+sub displayable_name {
+  my $self = shift;
+
+  return join ' ', grep $_, $self->customernumber, $self->name;
+}
+
 1;