Revision 1b9b086f
Von Sven Schöling vor mehr als 9 Jahren hinzugefügt
| SL/Controller/Admin.pm | ||
|---|---|---|
| 81 | 81 |
$::auth->set_session_value('admin_password', $::lx_office_conf{authentication}->{admin_password});
|
| 82 | 82 |
$::auth->create_or_refresh_session; |
| 83 | 83 |
|
| 84 |
return if $self->apply_dbupgrade_scripts; |
|
| 85 |
|
|
| 84 | 86 |
my $group = (SL::DB::Manager::AuthGroup->get_all(limit => 1))[0]; |
| 85 | 87 |
if (!$group) {
|
| 86 | 88 |
SL::DB::AuthGroup->new( |
| ... | ... | |
| 90 | 92 |
)->save; |
| 91 | 93 |
} |
| 92 | 94 |
|
| 93 |
if (!$self->apply_dbupgrade_scripts) {
|
|
| 94 |
$self->action_login; |
|
| 95 |
} |
|
| 95 |
$self->action_login; |
|
| 96 | 96 |
} |
| 97 | 97 |
|
| 98 | 98 |
# |
Auch abrufbar als: Unified diff
Admin: Standardgruppe erst anlegen, wenn keine dbupgrade mehr