Revision Navigation

Revision 325

Date:

2013/04/29 21:21:43

Author:

ahitrov

Revision Log:

pre_store bug

Files:

Legend:

: Added
: Removed
: Modified

utf8/plugins/users/lib/users/Email.pm


66	66	{
67	67	my $self = shift;
68	68
	69	foreach my $attr ( qw(name name_orig) ) {
	70	$self->{$attr} =~ s/^\s+//s;
	71	$self->{$attr} =~ s/\s+$//s;
	72	}
	73
69	74	my $default_section = $project->s_alias->{user_emails} if ref $project->s_alias eq 'HASH' && exists $project->s_alias->{user_emails};
70	75	if ( $default_section && !$self->{sections} ) {
71	76	$self->{sections} = $default_section;

utf8/plugins/users/lib/users/UserProfile.pm


3	3	use base "Contenido::Document";
4	4	use Digest::MD5;
5	5	use Contenido::Globals;
	6	use Data::Dumper;
6	7
7	8	my %CREDENTIAL_FIELDS = (
8	9	'users::Email' => 'email',
…	…
350	351	if ( $state->{users}->use_credentials ) {
351	352	foreach my $prop ( $self->structure ) {
352	353	my $name = $prop->{attr};
353		if ( ref $self->{$name} =~ /^users::OA::/ ) {
	354	if ( ref($self->{$name}) =~ /^users\:\:OA\:\:/ ) {
354	355	my $obj = $self->{$name};
355	356	$self->{$name} = $obj->ext_id;
356		} elsif ( ref $self->{$name} =~ /^users::/ ) {
	357	} elsif ( ref($self->{$name}) =~ /^users\:\:/ ) {
357	358	my $obj = $self->{$name};
358	359	$self->{$name} = $obj->name;
359	360	}

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

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

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

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