Projekt

Allgemein

Profil

Herunterladen (1006 Bytes) Statistiken
| Zweig: | Markierung: | Revision:
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;

8bed51b5 Sven Schöling
sub init_sub_layouts {
[ SL::Layout::None->new ]
f7f03503 Sven Schöling
}

343ccc1c Sven Schöling
sub use_stylesheet {
my $self = shift;
qw(
frame_header/header.css
),
$self->SUPER::use_stylesheet(@_);
}

bbf383bf Moritz Bunkus
sub use_javascript {
my $self = shift;
qw(
js/quicksearch_input.js
),
$self->SUPER::use_javascript(@_);
}

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;