• handler.pl.proto

    596 597  
    74 74 use locale;
    75 75 my $_comm = $_comments{$r->content_type};
    76 76 my $s_time_ = [Time::HiRes::gettimeofday];
    77 warn "Start: ".$m->current_comp->path."\n";
    77 78 if ($_comm) {
    78 79 $m->out("\n".$$_comm[0]." ".$m->current_comp->path.":\tStart t: ".Time::HiRes::time." ".$$_comm[1]."\n");
    79 80 }|;
    80 81 $ah_args{postamble} = q|
    82 warn "Timing: ".$m->current_comp->path.":\t".sprintf('%.1f ms', Time::HiRes::tv_interval($s_time_) * 1000)."\n";
    81 83 if ($_comm) {
    82 84 $m->out("\n".$$_comm[0]." ".$m->current_comp->path.":\tFinish t: ".Time::HiRes::time.", w: ".sprintf('%.4f', Time::HiRes::tv_interval($s_time_))." ".$$_comm[1]."\n");
    83 85 }|;
     
    87 89 |;
    88 90 }
    89 91 } else {
    90 $ah_args{preamble} = q|
    92 if (lc '@COMP_TIMINGS_DISABLE@' ne 'yes') {
    93 $ah_args{preamble} = q|
    91 94 use locale;
    92 |;
    95 my $s_time_ = [Time::HiRes::gettimeofday];
    96 |;
    97 $ah_args{postamble} = q|
    98 warn "Timing: ".$m->current_comp->path.":\t".sprintf('%.1f ms', Time::HiRes::tv_interval($s_time_) * 1000)."\n";
    99 |;
    100 } else {
    101 $ah_args{preamble} = q|
    102 use locale;
    103 |;
    104 }
    93 105 $ah_args{error_mode} = lc('@ERROR_MODE@') eq 'output' ? 'output':'fatal';
    94 106 $ah_args{preloads} = [qw(@PRELOADS@)];
    95 107 if (lc('@STATIC_SOURCE_ENABLE@') eq 'yes') {

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

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

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

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

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