Line # Revision Author
1 296 ahitrov % if ( $m->comp_exists ("/comps/$prj/popup_header.msn") ) {
2 <& "/comps/$prj/popup_header.msn" &>
3 % } else {
4 <& "/comps/popup_header.msn" &>
5 % }
6 <br>
7 <table border="0" cellspacing="0" cellpadding="0" align="center" width="320">
8 <tr><td style="border:1px solid gray;">
9 %#<iframe id="player" src="<% $doc->url %>" width="700" height="380" frameborder="0" scrolling="no"></iframe>
10 <object width="390" height="370">
11 <param name="movie" value="<% $doc->url %>"></param>
12 <embed width="390" height="370" src="<% $doc->url %>" type="application/x-shockwave-flash" allowScriptAccess="never"></embed>
13 </object>
14
15 </td></tr>
16 <tr>
17 <td style="padding:5px;">
18 <b><% $doc->name %></b>
19 </td></tr>
20 <tr><td style="padding:5px;">
21 <& /inc/text_format.msn, doc => $doc, field => 'abstr' &>
22 </td></tr>
23 </table>
24 % if ( $m->comp_exists ("/comps/$prj/popup_footer.msn") ) {
25 <& "/comps/$prj/popup_footer.msn" &>
26 % } else {
27 <& "/comps/popup_footer.msn" &>
28 % }
29 <%args>
30
31 $id => undef
32
33 </%args>
34 <%init>
35
36 &abort404 unless $id && $id =~ /^\d+$/;
37 my $prj = $request->{project};
38 my $doc = $keeper->get_document_by_id ( $id,
39 class => 'promosuite::Promoblock',
40 status => 1,
41 );
42 &abort404 unless ref $doc;
43
44 </%init>