Revision 2219d158
Von Sven Schöling vor etwa 12 Jahren hinzugefügt
SL/Controller/Layout/Base.pm | ||
---|---|---|
97 | 97 |
sub javascripts { |
98 | 98 |
my ($self) = @_; |
99 | 99 |
|
100 |
$::lxdebug->dump(0, "called", [ map { $self->find_javascript($_) } $self->use_javascript ]); |
|
101 | 100 |
return map { $self->_find_javascript($_) } $self->use_javascript; |
102 | 101 |
} |
103 | 102 |
|
... | ... | |
108 | 107 |
return $javascript if -f $javascript; |
109 | 108 |
} |
110 | 109 |
|
110 |
|
|
111 |
############################################ |
|
112 |
# track state of form header |
|
113 |
############################################ |
|
114 |
|
|
115 |
sub header_done { |
|
116 |
$_[0]{_header_done} = 1; |
|
117 |
} |
|
118 |
|
|
119 |
sub need_footer { |
|
120 |
$_[0]{_header_done}; |
|
121 |
} |
|
122 |
|
|
111 | 123 |
1; |
SL/Dispatcher.pm | ||
---|---|---|
269 | 269 |
} |
270 | 270 |
}; |
271 | 271 |
|
272 |
$::form->footer; |
|
273 |
|
|
272 | 274 |
# cleanup |
273 | 275 |
$::auth->save_session; |
274 | 276 |
$::auth->expire_sessions; |
SL/Form.pm | ||
---|---|---|
485 | 485 |
push @header, map { qq|<link rel="stylesheet" href="$_" type="text/css" title="Stylesheet">| } $layout->stylesheets; |
486 | 486 |
push @header, "<style type='text/css'>\@page { size:landscape; }</style> " if $self->{landscape}; |
487 | 487 |
push @header, "<link rel='shortcut icon' href='$self->{favicon}' type='image/x-icon'>" if -f $self->{favicon}; |
488 |
push @header, map { qq|<script type="text/javascript" src="$_"></script>| } $layout->javascripts; |
|
488 |
push @header, map { qq|<script type="text/javascript" src="$_"></script>| } $layout->javascripts;
|
|
489 | 489 |
push @header, $self->{javascript} if $self->{javascript}; |
490 | 490 |
push @header, map { $_->show_javascript } @{ $self->{AJAX} || [] }; |
491 | 491 |
push @header, "<script type='text/javascript'>function fokus(){ document.$self->{fokus}.focus(); }</script>" if $self->{fokus}; |
... | ... | |
525 | 525 |
print $::request->{layout}->pre_content; |
526 | 526 |
print $::request->{layout}->start_content; |
527 | 527 |
|
528 |
$layout->header_done; |
|
529 |
|
|
528 | 530 |
$::lxdebug->leave_sub; |
529 | 531 |
} |
530 | 532 |
|
531 | 533 |
sub footer { |
532 | 534 |
# TODO: fix abort conditions |
533 | 535 |
|
536 |
return unless $::request->{layout}->need_footer; |
|
537 |
|
|
534 | 538 |
print $::request->{layout}->end_content; |
535 | 539 |
print $::request->{layout}->post_content; |
536 | 540 |
# print "<script type='text/javascript' src='$_'></script>\n" for $::request->{layout}->javascripts; |
Auch abrufbar als: Unified diff
form->footer