X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FLayout%2FClassic.pm;h=e8974c1436d0f3c2ce29125eaf870b0b31040710;hb=53593baa211863fbf66540cf1bcc36c8fb37257f;hp=a2ef7702db8755abfdd19a258584a4a8a8a2d213;hpb=b6fd15a8dc44f9b09d5a2bce766cda14b87c6e13;p=kivitendo-erp.git diff --git a/SL/Layout/Classic.pm b/SL/Layout/Classic.pm index a2ef7702d..e8974c143 100644 --- a/SL/Layout/Classic.pm +++ b/SL/Layout/Classic.pm @@ -5,19 +5,22 @@ use parent qw(SL::Layout::Base); use SL::Layout::Top; use SL::Layout::MenuLeft; +use SL::Layout::None; +use SL::Layout::Split; +use SL::Layout::ActionBar; +use SL::Layout::Content; -sub new { - my ($class, @slurp) = @_; +sub init_sub_layouts { + $_[0]->sub_layouts_by_name->{actionbar} = SL::Layout::ActionBar->new; - my $self = $class->SUPER::new(@slurp); - - $self->add_sub_layouts([ - SL::Layout::Top->new, - SL::Layout::MenuLeft->new, + [ SL::Layout::None->new, - ]); - - $self; + SL::Layout::Top->new, + SL::Layout::Split->new( + left => [ SL::Layout::MenuLeft->new ], + right => [ $_[0]->sub_layouts_by_name->{actionbar}, SL::Layout::Content->new ], + ) + ] } 1;