From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Fri, 25 Feb 2011 17:03:27 +0000 (+0100)
Subject: Bearbeiten von Nutzern mit Umlauten im Namen gefixt
X-Git-Tag: release-2.6.3~67
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=f8727c5475bdccfc3dda74506833c0b07fec39cf;p=kivitendo-erp.git

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.
---

diff --git a/bin/mozilla/admin.pl b/bin/mozilla/admin.pl
index e92de0c24..ddb12b1d8 100755
--- a/bin/mozilla/admin.pl
+++ b/bin/mozilla/admin.pl
@@ -34,6 +34,7 @@
 
 use DBI;
 use CGI;
+use Encode;
 use English qw(-no_match_vars);
 use Fcntl;
 use File::Copy;
@@ -342,7 +343,10 @@ sub list_users {
 
   delete $members{"root login"};
 
-  map { $_->{templates} =~ s|.*/||; } values %members;
+  for (values %members) {
+    $_->{templates} =~ s|.*/||;
+    $_->{login_url} =  $::locale->is_utf8 ? Encode::encode('utf-8-strict', $_->{login}) : $_->{login_url};
+  }
 
   $form->{title}   = "Lx-Office ERP " . $locale->text('Administration');
   $form->{LOCKED}  = -e _nologin_file_name();
diff --git a/templates/webpages/admin/list_users.html b/templates/webpages/admin/list_users.html
index 0828b00c3..eb55dc51c 100644
--- a/templates/webpages/admin/list_users.html
+++ b/templates/webpages/admin/list_users.html
@@ -21,7 +21,7 @@
 
     [% FOREACH row = MEMBERS %]
      <tr class="listrow[% loop.count % 2 %]">
-      <td>&nbsp;<a href="admin.pl?action=edit&login=[% HTML.url(row.login) %]">[% HTML.escape(row.login) %]</a></td>
+      <td>&nbsp;<a href="admin.pl?action=edit&login=[% HTML.url(row.login_url) %]">[% HTML.escape(row.login) %]</a></td>
       <td>&nbsp;[% HTML.escape(row.name) %]</td>
       <td>&nbsp;[% HTML.escape(row.company) %]</td>
       <td>&nbsp;[% HTML.escape(row.templates) %]</td>