package CLMApp::Schema::ResultSet::DistributorCompany;
use base CLMApp::Schema::ResultSet;

use Perl6::Junction qw/ any /;
use Data::Show;

use Moose::Autobox;

sub by_id {
  return shift->find({pid => pop});
}

sub by_name {
  return shift->find({title => {LIKE => pop}});
}

sub by_id_or_name {
  my ($self, $param) = @_;
  return $param =~ /^\d+$/ ? $self->by_id($param) : $self->by_name($param);
}

1;