X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/c7edb24800396748f2bf1e40ff05f90a18d31b02..261cfce2d80642a4df62b59a92cb5cc48cf279a4:/bin/mozilla/menujs.pl
diff --git a/bin/mozilla/menujs.pl b/bin/mozilla/menujs.pl
index af60595c8..202f75c26 100644
--- a/bin/mozilla/menujs.pl
+++ b/bin/mozilla/menujs.pl
@@ -35,12 +35,12 @@
# 2004-12-14 - Holger Lindemann
#######################################################################
-my $menufile = "menu.ini";
+use utf8;
+use strict;
+
use SL::Menu;
use CGI::Carp qw(fatalsToBrowser);
-use strict;
-
1;
# end of main
@@ -79,7 +79,7 @@ sub clock_line {
my $login = "[Nutzer "
. $form->{login}
- . " - "
+ . " - "
. $::locale->text('Logout')
. "] ";
my ($Sekunden, $Minuten, $Stunden, $Monatstag, $Monat,
@@ -136,7 +136,7 @@ sub acc_menu {
my $mainlevel = $form->{level};
$mainlevel =~ s/$mainlevel--//g;
- my $menu = new Menu "$menufile";
+ my $menu = Menu->new("menu.ini");
$| = 1;
@@ -416,7 +416,7 @@ sub section_menu {
} else {
if ($menu->{$item}{module}) {
- #Untermenüpunkte
+ #Untermenüpunkte
my $target = $menu->{$item}{target};
my $uri = $menu->menuitem_js(\%myconfig, \%$form, $item, $level);