X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/b8b112a39bd601b0bc717646d78de470631da22a..2d7e4203055156dccb2ca3fba82bbb32873ecd2e:/SL/DB/Employee.pm diff --git a/SL/DB/Employee.pm b/SL/DB/Employee.pm index 92444551e..4cc109a68 100644 --- a/SL/DB/Employee.pm +++ b/SL/DB/Employee.pm @@ -5,6 +5,8 @@ use strict; use SL::DB::MetaSetup::Employee; use SL::DB::Manager::Employee; +__PACKAGE__->meta->initialize; + sub has_right { my $self = shift; my $right = shift;