Beim Ändern des Administratorpasswortes sollte das neue Passwort doppelt angegeben...
authorMoritz Bunkus <m.bunkus@linet-services.de>
Mon, 4 Dec 2006 16:40:21 +0000 (16:40 +0000)
committerMoritz Bunkus <m.bunkus@linet-services.de>
Mon, 4 Dec 2006 16:40:21 +0000 (16:40 +0000)
bin/mozilla/admin.pl
locale/de/admin
locale/de/all

index f0b1c2d..71828e2 100644 (file)
@@ -863,7 +863,7 @@ sub save {
   $myconfig = new User "$memberfile", "$form->{login}";
 
   # redo acs variable and delete all the acs codes
-  @acs = split /;/, $form->{acs};
+  @acs = split(/;/, $form->{acs});
 
   $form->{acs} = "";
   foreach $item (@acs) {
@@ -1121,9 +1121,16 @@ sub change_admin_password {
 
 <form method=post action=$form->{script}>
 
-<b>|
-    . $locale->text('Password')
-    . qq|</b> <input type=password name=password size=8>
+<table>
+  <tr>
+    <td><b>| . $locale->text('Password') . qq|</b></td>
+    <td><input type=password name=password size=8></td>
+  </tr>
+  <tr>
+    <td><b>| . $locale->text('Repeat the password') . qq|</b></td>
+    <td><input type=password name=password_again size=8></b></td>
+  </tr>
+</table>
 
 <input type=hidden name=path value=$form->{path}>
 <input type=hidden name=rpw value=$form->{rpw}>
@@ -1141,6 +1148,24 @@ sub change_admin_password {
 }
 
 sub change_password {
+  if ($form->{"password"} ne $form->{"password_again"}) {
+    $form->{title} =
+      qq|Lx-Office ERP |
+      . $locale->text('Administration') . " / "
+      . $locale->text('Change Admin Password');
+
+    $form->header;
+
+    print qq|
+<body class=admin>
+
+
+<h2>| . $locale->text('Change Admin Password') . qq|</h2>
+
+<p>| . $locale->text("The passwords do not match.") . qq|<br>
+<input type="button" onclick="history.back()" value="| . $locale->text("Back") . qq|">|;
+    return;
+  }
 
   $root->{password} = $form->{password};
 
index 9cc69f4..c8163f5 100644 (file)
@@ -5,6 +5,7 @@ $self{texts} = {
   'Administration'              => 'Administration',
   'Administrator'               => 'Administrator',
   'All Datasets up to date!'    => 'Alle Datenbanken sind auf aktuellem Stand.',
+  'Back'                        => 'Zur&uuml;ck',
   'Cannot create Lock!'         => 'System kann nicht gesperrt werden!',
   'Change Admin Password'       => 'Administratorpasswort ändern',
   'Change Password'             => 'Passwort ändern',
@@ -62,6 +63,7 @@ $self{texts} = {
   'Port'                        => 'Port',
   'Port missing!'               => 'Portangabe fehlt!',
   'Printer'                     => 'Drucker',
+  'Repeat the password'         => 'Passwort wiederholen',
   'Save'                        => 'Speichern',
   'Setup Menu'                  => 'Menüsetup',
   'Setup Templates'             => 'Vorlagen auswählen',
@@ -72,6 +74,7 @@ $self{texts} = {
   'Templates'                   => 'Vorlagen',
   'The following Datasets are not in use and can be deleted' => 'Die folgenden Datenbanken sind nicht in Verwendung und können gelöscht werden',
   'The following Datasets need to be updated' => 'Folgende Datenbanken müssen aktualisiert werden',
+  'The passwords do not match.' => 'Die Passw&ouml;rter stimmen nicht &uuml;berein.',
   'This is a preliminary check for existing sources. Nothing will be created or deleted at this stage!' => 'In diesem Schritt werden bestehende Datenbanken gesucht. Es werden noch keine Änderungen vorgenommen!',
   'To add a user to a group edit a name, change the login name and save.  A new user with the same variables will then be saved under the new login name.' => 'Um einer Gruppe einen neuen Benutzer hinzuzufügen, ändern und speichern Sie am einfachsten einen bestehen den Zugriffsnamen. Unter dem neuen Namen wird dann ein Benutzer mit denselben Einstellungen angelegt.',
   'Unlock System'               => 'System entsperren',
index 1650d6e..7a8e8e1 100644 (file)
@@ -796,6 +796,7 @@ gestartet',
   'Remove'                      => 'entfernen',
   'Removed spoolfiles!'         => 'Druckdateien entfernt!',
   'Removing marked entries from queue ...' => 'Markierte Einträge werden von der Warteschlange entfernt ...',
+  'Repeat the password'         => 'Passwort wiederholen',
   'Report for'                  => 'Bericht für',
   'Reports'                     => 'Berichte',
   'Reqdate'                     => 'Lieferdatum',
@@ -935,6 +936,7 @@ gestartet',
   'The name in row %d has already been used before.' => 'Der Name in Zeile %d wurde vorher bereits benutzt.',
   'The name is missing in row %d.' => 'Der Name fehlt in Zeile %d.',
   'The name is missing.'        => 'Der Name fehlt.',
+  'The passwords do not match.' => 'Die Passw&ouml;rter stimmen nicht &uuml;berein.',
   'The unit has been saved.'    => 'Die Einheit wurde gespeichert.',
   'The unit in row %d has been deleted in the meantime.' => 'Die Einheit in Zeile %d ist in der Zwischentzeit gel&ouml;scht worden.',
   'The unit in row %d has been used in the meantime and cannot be changed anymore.' => 'Die Einheit in Zeile %d wurde in der Zwischenzeit benutzt und kann nicht mehr ge&auml;ndert werden.',