|
package SL::Layout::Classic;
|
|
|
|
use strict;
|
|
use parent qw(SL::Layout::Design40Switch);
|
|
|
|
use SL::Layout::Top;
|
|
use SL::Layout::MenuLeft;
|
|
use SL::Layout::None;
|
|
use SL::Layout::Split;
|
|
use SL::Layout::ActionBar;
|
|
use SL::Layout::Flash;
|
|
use SL::Layout::Content;
|
|
|
|
sub init_sub_layouts {
|
|
$_[0]->sub_layouts_by_name->{actionbar} = SL::Layout::ActionBar->new;
|
|
$_[0]->sub_layouts_by_name->{flash} = SL::Layout::Flash->new;
|
|
|
|
[
|
|
SL::Layout::None->new,
|
|
SL::Layout::Top->new,
|
|
SL::Layout::Split->new(
|
|
left => [ SL::Layout::MenuLeft->new ],
|
|
right => [
|
|
$_[0]->sub_layouts_by_name->{actionbar},
|
|
$_[0]->sub_layouts_by_name->{flash},
|
|
SL::Layout::Content->new,
|
|
],
|
|
)
|
|
]
|
|
}
|
|
|
|
1;
|