projects
/
kivitendo-erp.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
8688e829723e680b2a676a06dda42c0e19627580
[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
1;