% if ( $m->comp_exists ("/comps/$prj/popup_header.msn") ) {
<& "/comps/$prj/popup_header.msn" &>
% } else {
<& "/comps/popup_header.msn" &>
% }
%#
|
<% $doc->name %>
|
<& /inc/text_format.msn, doc => $doc, field => 'abstr' &>
|
% if ( $m->comp_exists ("/comps/$prj/popup_footer.msn") ) {
<& "/comps/$prj/popup_footer.msn" &>
% } else {
<& "/comps/popup_footer.msn" &>
% }
<%args>
$id => undef
%args>
<%init>
&abort404 unless $id && $id =~ /^\d+$/;
my $prj = $request->{project};
my $doc = $keeper->get_document_by_id ( $id,
class => 'promosuite::Promoblock',
status => 1,
);
&abort404 unless ref $doc;
%init>