SL/DB/Pricegroup.pm

   1 package SL::DB::Pricegroup;
   2
   3 use strict;
   4
   5 use SL::DB::MetaSetup::Pricegroup;
   6 use SL::DB::Manager::Pricegroup;
   7
   8 __PACKAGE__->meta->initialize;
   9
  10 sub displayable_name {
  11   my $self = shift;
  12
  13   return join ' ', grep $_, $self->id, $self->pricegroup;
  14 }
  15
  16
  17 1;