X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/01b3bcb99ddc65a3d4504abf3d12f7dff632c05e..98a282978572450fdee1f21f2079aab1219aebae:/SL/Form.pm diff --git a/SL/Form.pm b/SL/Form.pm index 7eab5c294..d171e8739 100644 --- a/SL/Form.pm +++ b/SL/Form.pm @@ -464,7 +464,14 @@ sub get_stylesheet_for_user { my $css_path = 'css'; if (my $user_style = $::myconfig{stylesheet}) { $user_style =~ s/\.css$//; # nuke trailing .css, this is a remnand of pre 2.7.0 stylesheet handling - $css_path = "$css_path/$user_style" if -d "$css_path/$user_style"; + if (-d "$css_path/$user_style" && + -f "$css_path/$user_style/main.css") { + $css_path = "$css_path/$user_style"; + } else { + $css_path = "$css_path/lx-office-erp"; + } + } else { + $css_path = "$css_path/lx-office-erp"; } $::myconfig{css_path} = $css_path; # needed for menunew, FIXME: don't do this here @@ -501,7 +508,8 @@ sub header { push @header, map { qq|| } qw(jquery common jscalendar/calendar jscalendar/lang/calendar-de jscalendar/calendar-setup part_selection jquery-ui jqModal switchmenuframe); push @header, map { qq|| } - qw(main menu tabcontent list_accounts jquery.autocomplete jquery.multiselect2side frame_header/header); + qw(main menu tabcontent list_accounts jquery.autocomplete jquery.multiselect2side frame_header/header ui-lightness/jquery-ui-1.8.12.custom); + push @header, map { qq|| } push @header, map { $_->show_javascript } @{ $self->{AJAX} || [] }; push @header, "" if $self->{fokus}; push @header, sprintf "",