Line # Revision Author
1 3 ahitrov@rambler.ru <%args>
2 $name => undef
3 $SETS => undef
4 </%args>
5
6 <%init>
7 return undef if (! ref($SETS));
8 return undef if (! $name);
9
10 my $FIELDS = {};
11 while (my ($element,$value)=each %{$SETS}) {
12 if ($element =~ /^${name}_key_(\d+)$/ && $SETS->{"${name}_value_$1"}) {
13 $FIELDS->{$value}=$SETS->{"${name}_value_$1"};
14 }
15 }
16 {
17 local $Data::Dumper::Indent = 0;
18 return Data::Dumper::Dumper($FIELDS);
19 }
20 </%init>

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

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

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

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

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