X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=SL%2FLayout%2FMenuLeft.pm;h=f2e8a053fa197c6fde30c3da5dca5784fe8a9a2b;hb=833f083eae2a4547c49f8f92a2fdca6ba4dfe5f4;hp=9a47d292dfa6dc2409857781fe0b40c6b417e1a3;hpb=cd73950c9f7616255cf917e36a6e1a03627f860d;p=kivitendo-erp.git diff --git a/SL/Layout/MenuLeft.pm b/SL/Layout/MenuLeft.pm index 9a47d292d..f2e8a053f 100644 --- a/SL/Layout/MenuLeft.pm +++ b/SL/Layout/MenuLeft.pm @@ -51,7 +51,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";