X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/1bb4746aab9fd0062463cf1c6374fea3e3b15eae..46bc75c8:/bin/mozilla/menuv4.pl diff --git a/bin/mozilla/menuv4.pl b/bin/mozilla/menuv4.pl index 56d734728..25d7d792c 100644 --- a/bin/mozilla/menuv4.pl +++ b/bin/mozilla/menuv4.pl @@ -44,7 +44,7 @@ use strict; sub display { my $form = $main::form; - $form->header(qq||); + $form->header(extra_code => qq||); $form->{date} = clock_line(); $form->{menu} = acc_menu(); @@ -87,7 +87,7 @@ sub acc_menu { my $mainlevel = $form->{level}; $mainlevel =~ s/\Q$mainlevel\E--//g; - my $menu = Menu->new($::menufile); + my $menu = Menu->new("menu.ini"); $| = 1; @@ -126,7 +126,7 @@ sub print_menu { my $h = print_menu($menu, "${parent}${item}", $depth * 1 + 1)."\n"; if (!$parent) { - $html .= qq|