Revision dec3d0e2
Von Moritz Bunkus vor mehr als 11 Jahren hinzugefügt
| sql/Pg-upgrade2-auth/clients.pl | ||
|---|---|---|
| 95 | 95 |
|
| 96 | 96 |
push @clients, {
|
| 97 | 97 |
map({ $_ => $user->{$_} } @copy_fields),
|
| 98 |
name => $::locale->text('Client #1', scalar(@clients) + 1),
|
|
| 99 | 98 |
users => [ $user->{id} ],
|
| 100 | 99 |
groups => [ map { $_->{id} } @{ $self->groups } ],
|
| 101 | 100 |
enabled => 1, |
| ... | ... | |
| 113 | 112 |
my $num = 0; |
| 114 | 113 |
foreach my $client (@clients) {
|
| 115 | 114 |
$num += 1; |
| 115 |
$client->{name} ||= $::locale->text('Client #1', $num);
|
|
| 116 | 116 |
$client->{dbhost} ||= 'localhost';
|
| 117 | 117 |
$client->{dbport} ||= 5432;
|
| 118 | 118 |
$client->{templates} =~ s:templates/::;
|
Auch abrufbar als: Unified diff
Neuen Mandantennamen erst nach letztem Filtern erstellen