Revision f8727c54
Von Moritz Bunkus vor mehr als 13 Jahren hinzugefügt
| bin/mozilla/admin.pl | ||
|---|---|---|
| 34 | 34 |
|
| 35 | 35 |
use DBI; |
| 36 | 36 |
use CGI; |
| 37 |
use Encode; |
|
| 37 | 38 |
use English qw(-no_match_vars); |
| 38 | 39 |
use Fcntl; |
| 39 | 40 |
use File::Copy; |
| ... | ... | |
| 342 | 343 |
|
| 343 | 344 |
delete $members{"root login"};
|
| 344 | 345 |
|
| 345 |
map { $_->{templates} =~ s|.*/||; } values %members;
|
|
| 346 |
for (values %members) {
|
|
| 347 |
$_->{templates} =~ s|.*/||;
|
|
| 348 |
$_->{login_url} = $::locale->is_utf8 ? Encode::encode('utf-8-strict', $_->{login}) : $_->{login_url};
|
|
| 349 |
} |
|
| 346 | 350 |
|
| 347 | 351 |
$form->{title} = "Lx-Office ERP " . $locale->text('Administration');
|
| 348 | 352 |
$form->{LOCKED} = -e _nologin_file_name();
|
Auch abrufbar als: Unified diff
Bearbeiten von Nutzern mit Umlauten im Namen gefixt
HTML.url() nimmt Perls interne Stringrepräsentation und ersetzt darin
die Umlaute. In UTF-8-Installationen muss das Ersetzen aber auf einer
UTF-8-Repräsentation erfolgen (so wie es Form::escape() auch macht).
Zweiter Teil des Fixes für Bug 1606.