Line # Revision Author
1 8 ahitrov@rambler.ru <%args>
2 $name
3 $value => undef
4 $expires => undef
5 </%args>
6 <%init>
7 if (defined $value)
8 {
9 my $cookie = new CGI::Cookie (
10 ## -domain => '.rambler.ru',
11 -name => $name,
12 -value => $value,
13 defined $expires ? (-expires => $expires) : (),
14 -secure => 0,
15 );
16 $r->headers_out->add('Set-cookie' => $cookie);
17 }
18 else
19 {
20 my %cookies = fetch CGI::Cookie;
21 my $value = $cookies{$name}->value() if exists $cookies{$name} && $cookies{$name};
22 return $value;
23 }
24 </%init>

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

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

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

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

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