USTVA Helpdatei aktualisiert.

[kivitendo-erp.git] / bin / mozilla / admin.pl
diff --git a/bin/mozilla/admin.pl b/bin/mozilla/admin.pl

index 566f29a..0829934 100644 (file)
--- a/bin/mozilla/admin.pl
+++ b/bin/mozilla/admin.pl
@@ -120,8 +120,7 @@ sub adminlogin {
      <th>| . $locale->text('Password') . qq|</th>
      <td><input type=password name=rpw></td>
      <td><input type=submit class=submit name=action value="|
-    . $locale->text('Login')
-    . qq|"></td>
+    . $locale->text('Login') . qq|"></td>
    </tr>
  <input type=hidden name=action value=login>
  <input type=hidden name=root value="root login">
@@ -369,8 +368,7 @@ $nologin
           <th align=right>| . $locale->text('Password') . qq|</th>
           <td><input class=login type=password name=password></td>
           <td><input type=submit name=action value="|
-    . $locale->text('Login')
-    . qq|"></td>
+    . $locale->text('Login') . qq|"></td>
         </tr>
  <input type=hidden name=path value=$form->{path}>
        </table>
@@ -422,7 +420,8 @@ sub form_header {
    %countrycodes = User->country_codes;
    $countrycodes = "";
    foreach $key (sort { $countrycodes{$a} cmp $countrycodes{$b} }
-                keys %countrycodes) {
+                keys %countrycodes
+    ) {
      $countrycodes .=
        ($myconfig->{countrycode} eq $key)
        ? "<option selected value=$key>$countrycodes{$key}"
@@ -483,6 +482,9 @@ sub form_header {
  
    $form->header;
  
+  if ($myconfig->{menustyle} eq "neu") { $neu = "checked"; }
+  else { $old = "checked"; }
+
    print qq|
  <body class=admin>
  
@@ -587,6 +589,11 @@ sub form_header {
           <th align=right>| . $locale->text('Setup Templates') . qq|</th>
           <td><select name=mastertemplates>$mastertemplates</select></td>
         </tr>
+       <tr>
+           <th align=right>| . $locale->text('Setup Menu') . qq|</th>
+           <td><input name=menustyle type=radio class=radio value=neu $neu>&nbsp;New
+                 <input name=menustyle type=radio class=radio value=old $old>&nbsp;Old</td>
+         </tr>
         <input type=hidden name=templates value=$myconfig->{templates}>
        </table>
      </td>
@@ -1475,8 +1482,7 @@ sub create_dataset {
    <tr>
  
      <th align=right nowrap>|
-    . $locale->text('Create Chart of Accounts')
-    . qq|</th>
+    . $locale->text('Create Chart of Accounts') . qq|</th>
      <td>@charts</td>
  
    </tr>