package SL::Layout::Admin;
use strict;
-use parent qw(SL::Layout::Base);
+use parent qw(SL::Layout::None);
-sub new {
- my ($class, @slurp) = @_;
+use SL::Menu;
+use SL::Layout::None;
+use SL::Layout::Top;
+use SL::Layout::CssMenu;
- my $self = $class->SUPER::new(@slurp);
-
- $self->add_sub_layouts([
+sub init_sub_layouts {
+ [
SL::Layout::None->new,
- ]);
-
- $self;
+ SL::Layout::CssMenu->new(menu => SL::Menu->new('admin')),
+ ]
}
sub start_content {
"</div>\n";
}
+
1;