X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/b65a230d60e86d2c18a3ab7222379905aea5ecd7..72ad92fd:/bin/mozilla/menujs.pl diff --git a/bin/mozilla/menujs.pl b/bin/mozilla/menujs.pl index ef7b2b817..7cc592671 100644 --- a/bin/mozilla/menujs.pl +++ b/bin/mozilla/menujs.pl @@ -35,14 +35,11 @@ # 2004-12-14 - Holger Lindemann ####################################################################### -my $menufile = "menu.ini"; use SL::Menu; use CGI::Carp qw(fatalsToBrowser); use strict; -my $locale; - 1; # end of main @@ -82,7 +79,7 @@ sub clock_line { my $login = "[Nutzer " . $form->{login} . " - " - . $locale->text('Logout') + . $::locale->text('Logout') . "] "; my ($Sekunden, $Minuten, $Stunden, $Monatstag, $Monat, $Jahr, $Wochentag, $Jahrestag, $Sommerzeit) @@ -136,10 +133,9 @@ sub acc_menu { my $form = $main::form; my %myconfig = %main::myconfig; - $locale = Locale->new($myconfig{countrycode}, "menu"); my $mainlevel = $form->{level}; $mainlevel =~ s/$mainlevel--//g; - my $menu = new Menu "$menufile"; + my $menu = Menu->new($::menufile); $| = 1; @@ -390,7 +386,7 @@ sub section_menu { my $ml = $item; $label =~ s/$level--//g; $ml =~ s/--.*//; - $label = $locale->text($label); + $label = $::locale->text($label); $label =~ s/ / /g; $menu->{$item}{target} = "main_window" unless $menu->{$item}{target};