X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fkopf.pl;h=ed11e522be1af6b8b712a8ee2308d6e885f04631;hb=39294de3fcf40d987865ff17ddab1de070c29f63;hp=1b72e46b15276d76587d3a43961873c01304b078;hpb=dc50b737f80c8bd09ac2fbbfa2cc06a04e9d8753;p=kivitendo-erp.git diff --git a/bin/mozilla/kopf.pl b/bin/mozilla/kopf.pl index 1b72e46b1..ed11e522b 100644 --- a/bin/mozilla/kopf.pl +++ b/bin/mozilla/kopf.pl @@ -9,6 +9,8 @@ use strict; sub run { my $session_result = shift; + %::myconfig = $::auth->read_user($::form->{login}) if $::form->{login}; + $::locale = Locale->new($::myconfig{countrycode}) if $::myconfig{countrycode}; my $form = $main::form; my $locale = $main::locale; @@ -23,8 +25,8 @@ foreach (@felder) { $name = $wert; } my $login = - "[" . $form->{login} - . " - " + "". $locale->text('User') . ": " . $form->{login} + . " [text('Logout now') . "\">" . $locale->text('Logout') . "] "; my ($Sekunden, $Minuten, $Stunden, $Monatstag, $Monat, @@ -105,18 +107,22 @@ window.onload=clockon |; -# print qq| - + - - + |; + if ( !($ENV{HTTP_USER_AGENT} =~ /links/i) ) { # do not show the the links in case of "links" in HTTP_USER_AGENT + print qq| + |; + } + print qq| @@ -125,7 +131,6 @@ print qq| |; - } 1;

- [\| . $locale->text('Print') . qq\|] - [\| . $locale->text('New Win/Tab') . qq\|] - [\| . $locale->text('Back') . qq\|] - -
+ [\| . $locale->text('Menu') . qq\|] + [\| . $locale->text('New Win/Tab') . qq\|] + [\| . $locale->text('Print') . qq\|] + [\| . $locale->text('Back') . qq\|] + [\| . $locale->text('Fwd') . qq\|] +	\| . $login . $datum . qq\|