Revision a8814e0e
Von Sven Schöling vor etwa 12 Jahren hinzugefügt
| SL/Controller/Layout/MenuLeft.pm | ||
|---|---|---|
| 12 | 12 |
|
| 13 | 13 |
my $self = $class->SUPER::new(@slurp); |
| 14 | 14 |
|
| 15 |
$self->use_stylesheet(qw(css/icons16.css css/icons24.css)); |
|
| 16 |
|
|
| 17 | 15 |
$self; |
| 18 | 16 |
} |
| 19 | 17 |
|
| 20 |
sub render {
|
|
| 21 |
my ($self) = @_;
|
|
| 22 |
my $sections = [ section_menu($self->menu) ];
|
|
| 18 |
sub stylesheets {
|
|
| 19 |
qw(css/icons16.css css/icons24.css)
|
|
| 20 |
}
|
|
| 23 | 21 |
|
| 24 |
$self->SUPER::render('menu/menu', { no_menu => 1, no_output => 1 },
|
|
| 22 |
sub javascripts_inline {
|
|
| 23 |
my $self = shift; |
|
| 24 |
my $sections = [ section_menu($self->menu) ]; |
|
| 25 |
$self->render('menu/menu', { no_menu => 1, no_output => 1 },
|
|
| 25 | 26 |
sections => $sections, |
| 26 |
); |
|
| 27 |
) |
|
| 28 |
} |
|
| 29 |
|
|
| 30 |
sub pre_content {
|
|
| 31 |
"<div id='html-menu'></div>\n"; |
|
| 32 |
} |
|
| 33 |
|
|
| 34 |
sub start_content {
|
|
| 35 |
"<div id='content' class='html-menu'>\n"; |
|
| 36 |
} |
|
| 37 |
|
|
| 38 |
sub end_content {
|
|
| 39 |
"</div>\n"; |
|
| 27 | 40 |
} |
| 28 | 41 |
|
| 29 | 42 |
sub section_menu {
|
Auch abrufbar als: Unified diff
besseres interface und delegating für layouts, inline accessoren
html menü in footer verschoben