- } else {
- if ($menu->{$item}{module}) {
- if ($form->{$item} && $form->{level} eq $item) {
- $menu->{$item}{$item} = !$form->{$item};
- if ($zeige) {
- print
- qq|<tr><td valign=bottom>$spacer<img src="image/unterpunkt.png">|
- . $menu->menuitem(\%myconfig, \%$form, $item, $level)
- . qq|$label</a></td></tr>\n|;
- }
-
- # remove same level items
- map { shift @menuorder } grep /^$item/, @menuorder;
- §ion_menu($menu, $item);
- } else {
- if ($zeige) {
- if (scalar @chunks <= 1) {
- print
- qq|<tr><td class="hover" height="13" >$spacer<img src="image/unterpunkt.png" style="vertical-align:text-top">|
- . $menu->menuitem(\%myconfig, \%$form, $item, $level)
- . qq|$label</a></td></tr>\n|;
- } else {
- my $tmpitem = $menu->menuitem(\%myconfig, \%$form, $item, $level);
- print
- qq|<tr><td class="hover" height="13" >$spacer<img src="image/unterpunkt.png" style="vertical-align:text-top">|
- . $tmpitem
- . qq|$chunks[0]</a></td></tr>\n|;
- map {
- print
- qq|<tr style="vertical-align:top""><td class="hover">$spacer<img src="image/unterpunkt.png" style="visibility:hidden; width:23; height=2;">|
- . $tmpitem
- . qq|$chunks[$_]</a></td></tr>\n|;
- } 1..$#chunks;
- }
- }
- }
- } else {
- my $ml_ = $form->escape($ml);
- print
- qq|<tr><td class="bg" height="22" align="left" valign="middle" ><img src="image/$item.png" style="vertical-align:middle"> <a href="menu.pl?action=acc_menu&level=$ml_" class="nohover">$label</a> </td></tr>\n|;
- §ion_menu($menu, $item);
+ } elsif ($menuitem->{module}) {
+ my $image = make_image(label => $label, icon => $label_icon);
+ print make_item(img => $image, a => $anchor, spacer => $spacer, label => $label) if $show;
+ section_menu($menu, $item) if $show && $::form->{$item} && $::form->{level} eq $item;
+ }
+ }
+ $::lxdebug->leave_sub;
+}