kivitendo/SL/Layout/Split.pm @ ccf94c5d
| 0466a6b3 | Sven Schöling | package SL::Layout::Split;
|
|
use strict;
|
|||
use parent qw(SL::Layout::Base);
|
|||
use SL::Presenter;
|
|||
use Rose::Object::MakeMethods::Generic (
|
|||
'scalar' => [ qw(left right) ],
|
|||
);
|
|||
sub sub_layouts {
|
|||
@{ $_[0]->left || [] },
|
|||
@{ $_[0]->right || [] },
|
|||
}
|
|||
sub pre_content {
|
|||
my $left = join '', map { $_->pre_content } @{ $_[0]->left || [] };
|
|||
my $right = join '', map { $_->pre_content } @{ $_[0]->right || [] };
|
|||
SL::Presenter->get->html_tag('div', $left, class => 't-layout-left')
|
|||
.'<div class="t-layout-right html-menu">' . $right;
|
|||
}
|
|||
sub post_content {
|
|||
my $left = join '', map { $_->post_content } @{ $_[0]->left || [] };
|
|||
my $right = join '', map { $_->post_content } @{ $_[0]->right || [] };
|
|||
$right . '</div>'
|
|||
. SL::Presenter->get->html_tag('div', $left, class => 't-layout-left');
|
|||
}
|
|||
1;
|
|||
__END__
|
|||
=encoding utf-8
|
|||
=head1 NAME
|
|||
SL::Layout::Split
|
|||
=head1 SYNOPSIS
|
|||
use SL::Layout::TLayout;
|
|||
SL::Layout::TLayout->new(
|
|||
left => [ LIST OF SUBLAYOUTS ],
|
|||
right => [ LIST OF SUBLAYOUTS ],
|
|||
);
|
|||
=head1 DESCRIPTION
|
|||
Layout with left and right components, with content being part of the
|
|||
right block.
|
|||
=head1 BUGS
|
|||
Due to the way content is serialized it's currently not possible to shift the content into the other blocks
|
|||
=head1 AUTHOR
|
|||
Sven Schöling E<lt>s.schoeling@linet-services.deE<gt>
|
|||
=cut
|