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 "",