X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fmenuv3.pl;h=121d76df073a4d4489694d9bfa3851f3dc8e06da;hb=d4a434e1deba2695ef4d4a3fc0d51ac1b2044fb0;hp=683cabfa29587e56a979e914179e3580f77e9cc1;hpb=7f8cada2276e50879226ea553006ca7c714fac6a;p=kivitendo-erp.git diff --git a/bin/mozilla/menuv3.pl b/bin/mozilla/menuv3.pl index 683cabfa2..121d76df0 100644 --- a/bin/mozilla/menuv3.pl +++ b/bin/mozilla/menuv3.pl @@ -37,9 +37,6 @@ use URI; use strict; -my $menufile = "menu.ini"; -my $locale; - 1; # end of main @@ -47,7 +44,7 @@ my $locale; sub display { my $form = $main::form; - $form->header(qq||); + $form->header(extra_code => qq||); $form->{date} = clock_line(); $form->{menu} = acc_menu(); @@ -86,11 +83,9 @@ sub acc_menu { my $form = $main::form; my %myconfig = %main::myconfig; - $locale = Locale->new($myconfig{countrycode}, "menu"); - my $mainlevel = $form->{level}; $mainlevel =~ s/\Q$mainlevel\E--//g; - my $menu = new Menu "$menufile"; + my $menu = Menu->new("menu.ini"); $| = 1; @@ -118,7 +113,7 @@ sub print_menu { next if (($item eq "") || ($item =~ /--/)); my $menu_item = $menu->{"${parent}${item}"}; - my $menu_title = $locale->text($item); + my $menu_title = $::locale->text($item); my $menu_text = $menu_title; my $target = "main_window";