X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/9ad27e65cc381fdba086a926e83ef5789dff7a86..490b0f017ff3f88b192444eda0a46eb84bb1c478:/SL/Layout/MenuLeft.pm diff --git a/SL/Layout/MenuLeft.pm b/SL/Layout/MenuLeft.pm index 9a47d292d..14ee2eac9 100644 --- a/SL/Layout/MenuLeft.pm +++ b/SL/Layout/MenuLeft.pm @@ -13,7 +13,6 @@ sub stylesheets { sub javascripts_inline { my $self = shift; - $self->SUPER::javascripts_inline; my $sections = [ section_menu($self->menu) ]; $self->presenter->render('menu/menu', sections => $sections, @@ -51,7 +50,7 @@ sub section_menu { my $menuitem = $menu->{$item}; my $olabel = apply { s/.*--// } $item; my $ml = apply { s/--.*// } $item; - my $icon_class = apply { y/ /-/ } $item; + my $icon_class = apply { $_ =lc $_; s/[^a-z0-9_-]/-/g } $item; my $spacer = "s" . (0 + $item =~ s/--/--/g); next if $level && $item ne "$level--$olabel";