Ignoriere die Verzeichnisse "webpages" und ".svn" bei der Benutzerverwaltung, die...

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

index afd284bd932b38ee117d8be14269434f6b60530c..64dc2495028b4de07a1a861837e5ab628dfd8606 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}"
@@ -443,6 +442,7 @@ sub form_header {
  
    @allhtml = sort grep /\.html/, @all;
    @alldir = grep !/\.(html|tex)$/, @all;
+  @alldir = grep !/^(webpages|\.svn)$/, @alldir;
  
    @allhtml = reverse grep !/Default/, @allhtml;
    push @allhtml, 'Default';
@@ -483,6 +483,9 @@ sub form_header {
  
    $form->header;
  
+  if ($myconfig->{menustyle} eq "neu") { $neu = "checked"; }
+  else { $old = "checked"; }
+
    print qq|
  <body class=admin>
  
@@ -537,7 +540,7 @@ sub form_header {
         </tr>
          <tr valign=top>
           <th align=right>| . $locale->text('Ust-IDNr') . qq|</th>
-         <td><input name=ustid size=14 value="$myconfig->{ustid}"></td>
+         <td><input name=co_ustid size=14 value="$myconfig->{co_ustid}"></td>
         </tr>
          <tr valign=top>
           <th align=right>| . $locale->text('DUNS-Nr') . qq|</th>
@@ -587,6 +590,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>
@@ -647,7 +655,7 @@ sub form_header {
           <td><input name="${item}_dbuser" size=15 value=$form->{"${item}_dbuser"}></td>
           <th align=right>| . $locale->text('Password') . qq|</th>
           <td><input name="${item}_dbpasswd" type=password size=10 value=$form->{"${item}_dbpasswd"}></td>
-         
+
         </tr>|;
      }
  
@@ -777,7 +785,7 @@ sub form_header {
          $webdav{"${directory}c"} = "";
        }
      }
-    print qq|  
+    print qq|
     <tr>
      <td colspan=2><hr size=3 noshade></td>
    </tr>
@@ -787,15 +795,15 @@ sub form_header {
    <table width=100%>
         <tr>
         <td><input name=angebote class=checkbox type=checkbox value=1 $webdav{angebotec}>&nbsp;Angebot</td>
-       <td><input name=bestellungen class=checkbox type=checkbox value=1 $webdav{bestellungenc}>&nbsp;Bestellung</td> 
+       <td><input name=bestellungen class=checkbox type=checkbox value=1 $webdav{bestellungenc}>&nbsp;Bestellung</td>
         <td><input name=rechnungen class=checkbox type=checkbox value=1 $webdav{rechnungenc}>&nbsp;Rechnung</td>
         </tr>
         <tr>
         <td><input name=anfragen class=checkbox type=checkbox value=1 $webdav{anfragenc}>&nbsp;Angebot</td>
-       <td><input name=lieferantenbestellungen class=checkbox type=checkbox value=1 $webdav{lieferantenbestellungenc}>&nbsp;Lieferantenbestellung</td> 
+       <td><input name=lieferantenbestellungen class=checkbox type=checkbox value=1 $webdav{lieferantenbestellungenc}>&nbsp;Lieferantenbestellung</td>
         <td><input name=einkaufsrechnungen class=checkbox type=checkbox value=1 $webdav{einkaufsrechnungenc}>&nbsp;Einkaufsrechnung</td>
         </tr>
-  </table>    
+  </table>
    <tr>
      <td colspan=2><hr size=3 noshade></td>
    </tr>
@@ -1247,7 +1255,7 @@ sub dbselect_source {
      <td><input type=password name=dbpasswd size=10></td>
  
    </tr>
-  
+
    <tr>
  
      <th align=right>$form->{connectstring}</th>
@@ -1457,7 +1465,7 @@ sub create_dataset {
      <td>$dbsources</td>
  
    </tr>
-  
+
    <tr>
  
      <th align=right nowrap>| . $locale->text('Create Dataset') . qq|</th>
@@ -1471,16 +1479,15 @@ sub create_dataset {
      <td><select name=encoding>$selectencoding</select></td>
  
    </tr>
- 
+
    <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>
- 
+
    <tr><td colspan=2>
  <p>
  <input type=hidden name=dbdriver value=$form->{dbdriver}>
@@ -1598,7 +1605,7 @@ sub delete_dataset {
      $dbsources
      </td>
    </tr>
-  
+
    <tr><td>
  <p>
  <input type=hidden name=dbdriver value=$form->{dbdriver}>
@@ -1701,4 +1708,3 @@ sub lock_system {
    $form->redirect($locale->text('Lockfile created!'));
  
  }
-