Revision e5af8407
| SL/Controller/Admin.pm | ||
|---|---|---|
| 149 | 149 |
->config_values({ %{ $self->user->config_values }, %{ $props } });
|
| 150 | 150 |
|
| 151 | 151 |
my @errors = $self->user->validate; |
| 152 |
|
|
| 153 | 152 |
if (@errors) {
|
| 154 | 153 |
$self->js->flash('error', $_) foreach @errors;
|
| 155 | 154 |
return $self->js->render(); |
| ... | ... | |
| 174 | 173 |
$params->{'login'} . $timestamp, $params->{'login'});
|
| 175 | 174 |
$dbh->disconnect; |
| 176 | 175 |
} |
| 176 |
} elsif ($assign_documents) {
|
|
| 177 |
my $clients = SL::DB::Manager::AuthClient->get_all_sorted; |
|
| 178 |
for my $client (@$clients) {
|
|
| 179 |
|
|
| 180 |
my $dbh = $client->dbconnect(AutoCommit => 1); |
|
| 181 |
$dbh->do(qq|UPDATE employee SET deleted = FALSE, name = ?, deleted_email = ?, |
|
| 182 |
deleted_tel = ?, deleted_fax = ?, deleted_signature = ? WHERE login = ?|,undef, |
|
| 183 |
$self->user->get_config_value('name'), undef, undef, undef, undef, $params->{'login'});
|
|
| 184 |
$dbh->disconnect; |
|
| 185 |
} |
|
| 177 | 186 |
} |
| 178 | 187 |
|
| 179 | 188 |
$self->user->save; |
Auch abrufbar als: Unified diff
Falls Login wieder aktiviert werden soll, entsprechend employee anpassen