$menufile = "menu.ini";
use SL::Menu;
+use URI;
1;
sub display {
$form->header(qq|<link rel="stylesheet" href="css/menuv3.css?id=" type="text/css">|);
- $form->{date} = clock_line();
- $form->{menu} = acc_menu();
+ $form->{date} = clock_line();
+ $form->{menu} = acc_menu();
+ my $callback = $form->unescape($form->{callback});
+ $callback = URI->new($callback)->rel($callback) if $callback;
+ $callback = "login.pl?action=company_logo" if $callback =~ /^(\.\/)?$/;
+ $form->{callback} = $callback;
print $form->parse_html_template("menu/menuv3");
}
sub acc_menu {
- $locale = Locale->new($language, "menu");
+ $locale = Locale->new($myconfig{countrycode}, "menu");
$mainlevel = $form->{level};
$mainlevel =~ s/\Q$mainlevel\E--//g;
$html .= qq|<li><div class="x">${menu_text}</div><ul>${h}</ul></li>\n|;
}
} else {
- if ($depth>1) {
- $html .= qq|<li class='sub'>|;
- } else {
$html .= qq|<li>|;
- }
$html .= $menu->menuitem_v3(\%myconfig, $form, "${parent}$item",
{ "title" => $menu_title,
"target" => $target });