Merge branch 'master' of vc.linet-services.de:public/lx-office-erp
[kivitendo-erp.git] / SL / DB / Employee.pm
1 package SL::DB::Employee;
2
3 use strict;
4
5 use SL::DB::MetaSetup::Employee;
6 use SL::DB::Manager::Employee;
7
8 sub has_right {
9   my $self  = shift;
10   my $right = shift;
11
12   return $::auth->check_right($self->login, $right);
13 }
14
15 sub safe_name {
16   my ($self) = @_;
17
18   return $self->name || $self->login;
19 }
20
21 1;