my ($self) = @_;
return uniq map { $self->_find_javascript($_) }
- $self->use_javascript, map { $_->javascripts } $self->sub_layouts;
+ map({ $_->javascripts } $self->sub_layouts), $self->use_javascript;
}
sub _find_javascript {
sub init_sub_layouts {
[
+ SL::Layout::None->new,
SL::Layout::Top->new,
SL::Layout::MenuLeft->new,
- SL::Layout::None->new,
]
}
}
sub javascripts {
- 'js/jquery.cookie.js';
+ qw(
+ js/jquery.cookie.js
+ js/switchmenuframe.js
+ );
}
sub pre_content {
my $self = shift;
qw(
main.css
+ menu.css
),
$self->SUPER::use_stylesheet(@_);
}
[ SL::Layout::None->new ]
}
+sub use_stylesheet {
+ my $self = shift;
+ qw(
+ frame_header/header.css
+ ),
+ $self->SUPER::use_stylesheet(@_);
+}
+
sub pre_content {
&render;
}