% $m->comp_exists('/contenido/components/custom_head.msn') ? $m->comp('/contenido/components/custom_head.msn') : '' %> % if ( @plugins ) { % foreach my $plugin ( @plugins ) { % my ($include_dir, $include_comp); % if ( $plugin eq $state->project ) { % $include_dir = $state->{mason_comp}.'/contenido/'.$plugin.'/components/'; % } else { % $include_dir = $state->{plug_src}.'/'.$plugin.'/comps/contenido/'.$plugin.'/components/'; % } % $include_comp = '/contenido/'.$plugin.'/components/title_inc.msn'; % if ( -e $include_dir && $m->comp_exists($include_comp) ) { <& $include_comp &> % } % } % }
<%args> $style => undef $title => undef %args> <%init> my $pn = $state->project_name(); my ($pn_name, $pn_domen) = split(/\./, $pn); my @plugins = ($state->project, split(/\s+/, $state->plugins)); %init>