Line # Revision Author
1 296 ahitrov % if ( $m->comp_exists ("/comps/$prj/header.msn") ) {
2 <& "/comps/$prj/header.msn", alias => 'main' &>
3 % } else {
4 <& "/comps/header.msn", alias => 'main' &>
5 % }
6
7 <table border="0" cellspacing="0" cellpadding="10" width="100%">
8 <tr valign="top">
9 <td width="80%">
10
11 %
12 % ### Аннотация проекта
13 % ############################################################
14 % if ( $p == 1 && !ref $document ) {
15 % if ( $m->comp_exists ("/comps/$prj/block_project_anno.msn") ) {
16 <& "/comps/$prj/block_project_anno.msn" &>
17 % } else {
18 <& "/comps/block_project_anno.msn" &>
19 % }
20 % }
21 % ### /Аннотация проекта
22 %
23
24 <div class="mt10"></div>
25 <a name="members"></a>
26 <table border="0" cellspacing="0" cellpadding="0" width="100%" class="infoblock">
27 <tr>
28 <td class="cc" width="100%">
29
30 % if ( $id && ref $document ) {
31 % ### Один участник
32 % #######################################################
33 % if ( $m->comp_exists ("/comps/$prj/announce.msn") ) {
34 <& "/comps/$prj/announce.msn", document => $document &>
35 % } else {
36 <& "/comps/announce.msn", document => $document &>
37 % }
38 %
39 % }else{
40 % ### Список участников
41 % #######################################################
42 % if ( ref $section ) {
43 <div class="text">
44 <h2><% $section->name %></h2>
45 % if ( $m->comp_exists ("/comps/$prj/announce_list.msn") ) {
46 <& "/comps/$prj/announce_list.msn", section => $section, p => $p, size => $profile->anno_count &>
47 % } else {
48 <& "/comps/announce_list.msn", p => $p, size => $profile->anno_count &>
49 % }
50 </div>
51 % }
52 % } ### /Область участников
53
54 </td></tr>
55 </table>
56 </td>
57
58 % ### Правая колонка
59 % ###############################################
60 <td width="20%">
61 % if ( $m->comp_exists ("/comps/$prj/right.msn") ) {
62 <& "/comps/$prj/right.msn" &>
63 % }else{
64 <& /comps/right.msn &>
65 % }
66 </td>
67 % ### /Правая колонка
68
69 </tr>
70 </table>
71
72 % ### Футер
73 % ##############################################
74 % if ( $m->comp_exists ("/comps/$prj/footer.msn") ) {
75 <& "/comps/$prj/footer.msn" &>
76 % } else {
77 <& "/comps/footer.msn" &>
78 % }
79 % ### /Футер
80 <%args>
81
82 $p => 1
83 $id => undef
84
85 </%args>
86 <%init>
87
88 my $prj = $request->{project};
89 my $profile = $request->{project_profile};
90 my $root = $request->{project_section};
91 &abort404 if $id && $id !~ /^\d+$/;
92
93 my $document;
94 my ($section) = $keeper->get_sections (
95 s => $root->id,
96 class => 'promosuite::AnnoSection',
97 limit => 1,
98 status => 1,
99 );
100 if ( $id && ref $section ) {
101 $document = $keeper->get_document_by_id ($id,
102 s => $section->id,
103 class => 'promosuite::Anons',
104 status => 1,
105 );
106 }
107 </%init>

Небольшая справка по веткам

cnddist – контейнер, в котором хранятся все дистрибутивы всех библиотек и программных пакетов, которые использовались при построении различных версий Contenido. Если какой-то библиотеки в данном хранилище нет, инсталлятор сделает попытку "подтянуть" ее с веба (например, с CPAN). Если библиотека слишком старая, есть очень большая вероятность, что ее там уже нет. Поэтому мы храним весь хлам от всех сборок. Если какой-то дистрибутив вдруг отсутствует в cnddist - напишите нам, мы положим его туда.

koi8 – отмирающая ветка, чей код, выдача и все внутренние библиотеки заточены на кодировку KOI8-R. Вносятся только те дополнения, которые касаются внешнего вида и функционала админки, баги ядра, обязательные обновления портов и мелочи, которые легко скопипастить. В дальнейшем планируется полная остановка поддержки по данной ветке.

utf8 – актуальная ветка, заточенная под UTF-8.

Внутри каждой ветки: core – исходники ядра; install – скрипт установки инсталляции; plugins – плагины; samples – "готовые к употреблению" проекты, которые можно поставить, запустить и посмотреть, как они работают.