}
sub current {
- return undef unless $::form && $::form->{login};
- return shift->find_by(login => $::form->{login});
+ return undef unless $::myconfig{login};
+ return shift->find_by(login => $::myconfig{login});
}
sub update_entries_for_authorized_users {
For each user created by the administrator in the admin section an
entry only exists in the authentication table, but not in the employee
table. This is where this function comes in: It iterates over all
-authentication users that have access to the current client and ensure
-than an entry for them exists in the table C<employee>. The matching
+authentication users that have access to the current client and ensures
+that an entry for them exists in the table C<employee>. The matching
is done via the login name which must be the same in both tables.
The only other properties that will be copied from the authentication