X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fadmin.pl;h=118712531c81cf680a87b38a5a2740de733cda21;hb=39c62c1bb68cd520cccc2889aeaed2601d1a7c93;hp=afd284bd932b38ee117d8be14269434f6b60530c;hpb=d319704a66e9be64da837ccea10af6774c2b0838;p=kivitendo-erp.git diff --git a/bin/mozilla/admin.pl b/bin/mozilla/admin.pl index afd284bd9..118712531 100644 --- a/bin/mozilla/admin.pl +++ b/bin/mozilla/admin.pl @@ -38,6 +38,7 @@ use SL::Form; use SL::User; $form = new Form; +$form->{"root"} = "root login"; $locale = new Locale $language, "admin"; @@ -55,6 +56,7 @@ $form->{favicon} = "favicon.ico"; if ($form->{action}) { + $subroutine = $locale->findsub($form->{action}); if ($subroutine eq 'login') { @@ -120,11 +122,9 @@ sub adminlogin { | . $locale->text('Password') . qq| + . $locale->text('Login') . qq|"> - {path}> @@ -164,6 +164,10 @@ sub add_user { } $myconfig->{vclimit} = 200; + $myconfig->{"countrycode"} = "de"; + $myconfig->{"numberformat"} = "1000,00"; + $myconfig->{"dateformat"} = "dd.mm.yy"; + &form_header; &form_footer; @@ -193,8 +197,7 @@ sub form_footer { print qq| - - + {path}> {rpw}> @@ -290,7 +293,7 @@ sub list_users { foreach $key (sort keys %member) { $href = - "$script?action=edit&login=$key&path=$form->{path}&root=$form->{root}&rpw=$form->{rpw}"; + "$script?action=edit&login=$key&path=$form->{path}&rpw=$form->{rpw}"; $href =~ s/ /%20/g; $member{$key}{templates} =~ s/^$templates\///; @@ -329,7 +332,6 @@ sub list_users { {path}> {rpw}> -
@@ -369,8 +371,7 @@ $nologin | . $locale->text('Password') . qq| + . $locale->text('Login') . qq|"> {path}> @@ -422,7 +423,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) ? "