'array' => [
'add_stylesheets_inline' => { interface => 'add', hash_key => 'stylesheets_inline' },
'add_javascripts_inline' => { interface => 'add', hash_key => 'javascripts_inline' },
- 'sub_layouts',
- 'add_sub_layouts' => { interface => 'add', hash_key => 'sub_layouts' },
+ 'sub_layouts', => { interface => 'get_set_init' },
+ 'add_sub_layouts' => { interface => 'add', hash_key => 'sub_layouts' },
],
);
@{ $_[0]->{javascripts_inline} || [] };
}
+sub init_sub_layouts { [] }
+
#########################################
# Interface
########################################
+sub add_stylesheets {
+ &use_stylesheet;
+}
+
sub use_stylesheet {
my $self = shift;
push @{ $self->{stylesheets} ||= [] }, @_ if @_;
return $css_path;
}
+sub add_javascripts {
+ &use_javascript
+}
sub use_javascript {
my $self = shift;