kivitendo/SL/Layout/V3.pm @ 9b4b3771
| b6fd15a8 | Sven Schöling | package SL::Layout::V3;
|
||
| 4a12c839 | Sven Schöling | |||
use strict;
|
||||
| b6fd15a8 | Sven Schöling | use parent qw(SL::Layout::Base);
|
||
use SL::Layout::Css;
|
||||
| 4a12c839 | Sven Schöling | |||
use URI;
|
||||
| f7f03503 | Sven Schöling | sub new {
|
||
my ($class, @slurp) = @_;
|
||||
my $self = $class->SUPER::new(@slurp);
|
||||
$self->add_sub_layouts([
|
||||
| b6fd15a8 | Sven Schöling | SL::Layout::None->new,
|
||
| f7f03503 | Sven Schöling | ]);
|
||
$self;
|
||||
}
|
||||
| 4a12c839 | Sven Schöling | sub pre_content {
|
||
&render;
|
||||
}
|
||||
sub start_content {
|
||||
"<div id='content'>\n";
|
||||
}
|
||||
sub end_content {
|
||||
"</div>\n";
|
||||
}
|
||||
sub render {
|
||||
my ($self) = @_;
|
||||
my $callback = $::form->unescape($::form->{callback});
|
||||
$callback = URI->new($callback)->rel($callback) if $callback;
|
||||
$callback = "login.pl?action=company_logo" if $callback =~ /^(\.\/)?$/;
|
||||
$self->SUPER::render('menu/menuv3', { no_menu => 1, no_output => 1 },
|
||||
force_ul_width => 1,
|
||||
date => $self->clock_line,
|
||||
menu => $self->print_menu,
|
||||
callback => $callback,
|
||||
);
|
||||
}
|
||||
1;
|