%#============================================================================ %# ePortal - WEB Based daily organizer %# Author - S.Rusakov %# %# Copyright (c) 2000-2004 Sergey Rusakov. All rights reserved. %# This program is open source software %# %#---------------------------------------------------------------------------- <% img(src => '/images/icons/memo.gif') %> <% pick_lang(rus => "Добавить новую секцию", eng => "Add new section") %>

<&| /list.mc, obj => new ePortal::PageSection &> <&| /list.mc:row &> <& /list.mc:column_image &> <& /list.mc:column, id => 'title', order_by => 'title', url => href('ps_edit.htm', objid => $_->id) &> <&| /list.mc:column, id => 'component', order_by => 'component' &> <%perl> my $comp = $m->fetch_comp('/pv/sections/'. $_->component); if ( ! $comp ) { # component file does not exists <% $_->component %> <%perl> } else { <% $_->component %> <%perl> } <& /list.mc:column, id => 'width', order_by => 'width' &> <& /list.mc:column, id => 'xacl_read', order_by => 'xacl_read' &> <& /list.mc:column_delete &> <&| /list.mc:extra_row, start_column => 2 &> % if ($_->url) { URL: <% $_->url |h %> % } %#=== @METAGS onStartRequest ==================================================== <%method onStartRequest><%perl> %#=== @METAGS attr ========================================================= <%attr> Title => {rus => "Список секций для дом.страницы", eng => "Sections for home page"} require_admin => 1