Revision 3 (by ahitrov@rambler.ru, 2010/03/24 15:19:32) |
The CORE
|
<%args>
$root => undef,
$offset => undef,
$count_offset => undef,
$selected => undef,
$section_tree => undef
</%args>
<%INIT>
my $spacer = '';
for(my $c=1; $c<$offset; $c++) {
$spacer = $spacer.(($c == $offset-1) ? ' >> ' : ' ');
}
if( ref $root && $root->id != $Contenido::Section::ROOT ) {
$m->out('<option value="'.$root->id.'" '.(($selected == $root->id) ? ' selected' : '').'>'.$spacer.$root->name.'</option>');
}
my $childs = exists $section_tree->{$root->id} ? $section_tree->{$root->id}{children} : undef;
if((ref($childs) eq 'ARRAY') and (@$childs) && ($offset < $count_offset)) {
$offset++;
foreach my $child (@$childs) {
$m->comp('/contenido/components/select_index_tree_elem.msn',
section_tree => $section_tree, root => $child,
offset => $offset, count_offset => $count_offset, selected => $selected);
}
$offset--;
}
</%init>
Небольшая справка по веткам
cnddist – контейнер, в котором хранятся все дистрибутивы всех библиотек и программных пакетов, которые использовались при построении различных версий Contenido. Если какой-то библиотеки в данном хранилище нет, инсталлятор сделает попытку "подтянуть" ее с веба (например, с CPAN). Если библиотека слишком старая, есть очень большая вероятность, что ее там уже нет. Поэтому мы храним весь хлам от всех сборок. Если какой-то дистрибутив вдруг отсутствует в cnddist - напишите нам, мы положим его туда.
koi8 – отмирающая ветка, чей код, выдача и все внутренние библиотеки заточены на кодировку KOI8-R. Вносятся только те дополнения, которые касаются внешнего вида и функционала админки, баги ядра, обязательные обновления портов и мелочи, которые легко скопипастить. В дальнейшем планируется полная остановка поддержки по данной ветке.
utf8 – актуальная ветка, заточенная под UTF-8.
Внутри каждой ветки: core – исходники ядра; install – скрипт установки инсталляции; plugins – плагины; samples – "готовые к употреблению" проекты, которые можно поставить, запустить и посмотреть, как они работают.