Added user type attribute

This commit is contained in:
Tom Bloor 2017-08-25 14:59:01 +01:00
parent e886eb2ce6
commit 0a9ca57689

View file

@ -149,8 +149,17 @@ sub name {
} elsif ( defined $self->organisation_id ) { } elsif ( defined $self->organisation_id ) {
return $self->organisation->name; return $self->organisation->name;
} else { } else {
return undef; return;
} }
} }
sub type {
my $self = shift;
if ( defined $self->customer_id ) {
return "customer";
}
return "organisation";
}
1; 1;