Revision 01b3bcb9
Von Sven Schöling vor mehr als 12 Jahren hinzugefügt
SL/Form.pm | ||
---|---|---|
460 | 460 |
return @{ $self->{stylesheet} }; |
461 | 461 |
} |
462 | 462 |
|
463 |
sub get_stylesheet_for_user { |
|
464 |
my $css_path = 'css'; |
|
465 |
if (my $user_style = $::myconfig{stylesheet}) { |
|
466 |
$user_style =~ s/\.css$//; # nuke trailing .css, this is a remnand of pre 2.7.0 stylesheet handling |
|
467 |
$css_path = "$css_path/$user_style" if -d "$css_path/$user_style"; |
|
468 |
} |
|
469 |
$::myconfig{css_path} = $css_path; # needed for menunew, FIXME: don't do this here |
|
470 |
|
|
471 |
return $css_path; |
|
472 |
} |
|
473 |
|
|
463 | 474 |
sub header { |
464 | 475 |
$::lxdebug->enter_sub; |
465 | 476 |
|
... | ... | |
471 | 482 |
|
472 | 483 |
$::lxdebug->leave_sub and return if !$ENV{HTTP_USER_AGENT} || $self->{header}++; |
473 | 484 |
|
485 |
my $css_path = $self->get_stylesheet_for_user; |
|
486 |
|
|
474 | 487 |
$self->{favicon} ||= "favicon.ico"; |
475 | 488 |
$self->{titlebar} = "$self->{title} - $self->{titlebar}" if $self->{title}; |
476 | 489 |
|
... | ... | |
485 | 498 |
|
486 | 499 |
push @header, "<style type='text/css'>\@page { size:landscape; }</style>" if $self->{landscape}; |
487 | 500 |
push @header, "<link rel='shortcut icon' href='$self->{favicon}' type='image/x-icon'>" if -f $self->{favicon}; |
488 |
push @header, '<script type="text/javascript" src="js/jquery.js"></script>', |
|
489 |
'<script type="text/javascript" src="js/common.js"></script>', |
|
490 |
'<link rel="stylesheet" type="text/css" href="js/jscalendar/calendar-win2k-1.css">', |
|
491 |
'<script type="text/javascript" src="js/jscalendar/calendar.js"></script>', |
|
492 |
'<script type="text/javascript" src="js/jscalendar/lang/calendar-de.js"></script>', |
|
493 |
'<script type="text/javascript" src="js/jscalendar/calendar-setup.js"></script>', |
|
494 |
'<script type="text/javascript" src="js/part_selection.js"></script>', |
|
495 |
'<script type="text/javascript" src="js/jquery-ui.js"></script>', |
|
496 |
'<script type="text/javascript" src="js/jqModal.js"></script>', |
|
497 |
'<link rel="stylesheet" type="text/css" href="css/ui-lightness/jquery-ui-1.8.12.custom.css">'; |
|
498 |
push @header, $self->{javascript} if $self->{javascript}; |
|
501 |
push @header, map { qq|<script type="text/javascript" src="js/$_.js"></script>| } |
|
502 |
qw(jquery common jscalendar/calendar jscalendar/lang/calendar-de jscalendar/calendar-setup part_selection jquery-ui jqModal switchmenuframe); |
|
503 |
push @header, map { qq|<link rel="stylesheet" type="text/css" href="$css_path/$_.css">| } |
|
504 |
qw(main menu tabcontent list_accounts jquery.autocomplete jquery.multiselect2side frame_header/header); |
|
499 | 505 |
push @header, map { $_->show_javascript } @{ $self->{AJAX} || [] }; |
500 | 506 |
push @header, "<script type='text/javascript'>function fokus(){ document.$self->{fokus}.focus(); }</script>" if $self->{fokus}; |
501 | 507 |
push @header, sprintf "<script type='text/javascript'>top.document.title='%s';</script>", |
... | ... | |
531 | 537 |
EOT |
532 | 538 |
print " $_\n" for @header; |
533 | 539 |
print <<EOT; |
534 |
<link rel="stylesheet" href="css/jquery.autocomplete.css" type="text/css"> |
|
535 | 540 |
<meta name="robots" content="noindex,nofollow"> |
536 |
<link rel="stylesheet" type="text/css" href="css/tabcontent.css"> |
|
537 | 541 |
<script type="text/javascript" src="js/tabcontent.js"> |
538 | 542 |
|
539 | 543 |
/*********************************************** |
Auch abrufbar als: Unified diff
Stylesheets umorganisiert.
Doku in css/README.stylesheets