X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/82515b2d93dc5632f24d6e0b6f8f05f3fd19fbb0..da99c7bcf4a8ec82d9bc1d0c75aaba6ba4cd69ea:/SL/DB/Customer.pm?ds=sidebyside diff --git a/SL/DB/Customer.pm b/SL/DB/Customer.pm index fd5f66ef6..27683b3c1 100644 --- a/SL/DB/Customer.pm +++ b/SL/DB/Customer.pm @@ -12,7 +12,7 @@ __PACKAGE__->meta->add_relationship( class => 'SL::DB::Shipto', column_map => { id => 'trans_id' }, manager_args => { sort_by => 'lower(shipto.shiptoname)' }, - query_args => [ 'shipto.module' => 'CT' ], + query_args => [ 'module' => 'CT' ], }, business => { type => 'one to one', @@ -24,4 +24,10 @@ __PACKAGE__->meta->add_relationship( __PACKAGE__->meta->make_manager_class; __PACKAGE__->meta->initialize; +sub short_address { + my ($self) = @_; + + return join ', ', grep { $_ } $self->street, $self->zipcode, $self->city; +} + 1;