Revision Navigation

Revision 218

Date:

2012/06/16 14:40:38

Author:

ahitrov

Revision Log:

1. New port version
2. File deletion for "FILE_WEB_STORAGE = Common" scheme
3. Warning preventing

Files:

Legend:

: Added
: Removed
: Modified

koi8/core/lib/Contenido/File.pm


113	113	#�� /
114	114	$filename =~ s#^/##;
115	115
	116	my $success = 0;
116	117	foreach my $dir (@{$state->{"files_dir"}}) {
117		no strict "refs";
118		&{"Contenido::File::Scheme::".uc(scheme($dir))."::remove"}($dir."/".$filename);
	118	no strict "refs";
	119	my $scheme = uc(scheme($dir));
	120	my $res;
	121	if ( !$success \|\| $scheme eq 'FILE' ) {
	122	$res = &{"Contenido::File::Scheme::".$scheme."::remove"}($dir."/".$filename);
	123	}
	124	if ( $res && $scheme eq 'HTTP' && $state->{file_web_storage} eq 'common' ) {
	125	$success = 1;
	126	}
119	127	}
120	128
121	129	1;

koi8/core/lib/Contenido/Object.pm


459	459	foreach ($self->required_properties()) {
460	460
461	461	my $value = $self->{$_->{attr}};
462		$value = undef if (defined($value) and $value eq '') and (lc($_->{db_type}) eq 'float' or lc($_->{db_type} eq 'integer'));
463		$value = undef if lc $_->{db_type} eq 'integer[]' && ref $value ne 'ARRAY';
464		$value = undef if lc $_->{db_type} eq 'integer_ref[]' && ref $value ne 'ARRAY';
	462	if ( exists $_->{db_field} && $_->{db_field} ) {
	463	$value = undef if (defined($value) and $value eq '') and (lc($_->{db_type}) eq 'float' or lc($_->{db_type} eq 'integer'));
	464	$value = undef if lc $_->{db_type} eq 'integer[]' && ref $value ne 'ARRAY';
	465	$value = undef if lc $_->{db_type} eq 'integer_ref[]' && ref $value ne 'ARRAY';
	466	}
465	467
466	468	#�� readonly �� id
467	469	if ($self->id() and $_->{readonly}) {

koi8/core/ports/all/common-sense/GNUmakefile


5	5
6	6	include ../../etc/perl.mk
7	7
8		PORTVERSION = 3.4
	8	PORTVERSION = 3.5
9	9	PERL_MAKEMAKER = yes
10	10	MASTER_CPAN_SUBDIR = ../../authors/id/M/ML/MLEHMANN
11	11

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

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

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

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

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