displayable_name methode für customer
authorSven Schöling <s.schoeling@linet-services.de>
Tue, 11 Oct 2011 12:57:21 +0000 (14:57 +0200)
committerSven Schöling <s.schoeling@linet-services.de>
Tue, 11 Oct 2011 12:57:21 +0000 (14:57 +0200)
SL/DB/Customer.pm

index 0adffbd..f9f8901 100644 (file)
@@ -50,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;