Revision 8bed51b5
Von Sven Schöling vor etwa 12 Jahren hinzugefügt
SL/Layout/Admin.pm | ||
---|---|---|
3 | 3 |
use strict; |
4 | 4 |
use parent qw(SL::Layout::Base); |
5 | 5 |
|
6 |
sub new { |
|
7 |
my ($class, @slurp) = @_; |
|
8 |
|
|
9 |
my $self = $class->SUPER::new(@slurp); |
|
10 |
|
|
11 |
$self->add_sub_layouts([ |
|
12 |
SL::Layout::None->new, |
|
13 |
]); |
|
14 |
|
|
15 |
$self; |
|
6 |
sub init_sub_layouts { |
|
7 |
[ SL::Layout::None->new ] |
|
16 | 8 |
} |
17 | 9 |
|
18 | 10 |
sub start_content { |
Auch abrufbar als: Unified diff
init_sub_layouts ist sauberer