Revision 34af475f
Von Moritz Bunkus vor mehr als 11 Jahren hinzugefügt
| SL/Layout/Admin.pm | ||
|---|---|---|
| 1 | 1 |
package SL::Layout::Admin; |
| 2 | 2 |
|
| 3 | 3 |
use strict; |
| 4 |
use parent qw(SL::Layout::Base);
|
|
| 4 |
use parent qw(SL::Layout::V3);
|
|
| 5 | 5 |
|
| 6 |
sub init_sub_layouts {
|
|
| 7 |
[ SL::Layout::None->new ] |
|
| 6 |
use SL::Menu; |
|
| 7 |
|
|
| 8 |
use Rose::Object::MakeMethods::Generic ( |
|
| 9 |
scalar => [ qw(no_menu) ], |
|
| 10 |
); |
|
| 11 |
|
|
| 12 |
|
|
| 13 |
sub init_menu {
|
|
| 14 |
Menu->new('admin-menu.ini');
|
|
| 8 | 15 |
} |
| 9 | 16 |
|
| 10 | 17 |
sub start_content {
|
| 11 | 18 |
"<div id='admin' class='admin'>\n"; |
| 12 | 19 |
} |
| 13 | 20 |
|
| 14 |
sub end_content {
|
|
| 15 |
"</div>\n"; |
|
| 21 |
sub render {
|
|
| 22 |
my ($self) = @_; |
|
| 23 |
|
|
| 24 |
$self->presenter->render( |
|
| 25 |
'menu/menuv3', |
|
| 26 |
force_ul_width => 1, |
|
| 27 |
skip_frame_header => 1, |
|
| 28 |
menu => $self->no_menu ? '' : $self->print_menu, |
|
| 29 |
); |
|
| 16 | 30 |
} |
| 17 | 31 |
|
| 18 | 32 |
1; |
Auch abrufbar als: Unified diff
Administrationsbereich mit Menüsystem versehen