Revision 44

Date:
2010/08/02 17:19:19
Author:
ahitrov@rambler.ru
Revision Log:
Артефакт от KOI-версии
Files:

Legend:

 
Added
 
Removed
 
Modified

  • utf8/core/comps/contenido/components/inputs/status_multi.msn

     
    24 24
    25 25 my ($objects, $error);
    26 26
    27 # ���� ��� �������� � ���� ���� integer[] �� ��� �������� ������, ���� � data, �� ������ �� ������.
    28 # ��������� �����
    27 # Если оно хранится в поле типа integer[] то нам вернется массив, если в data, то ссылка на массив.
    28 # Просекаем фишку
    29 29 my @ids = ref($object->$name) eq 'ARRAY' ? @{ $object->$name } : $object->$name;
    30 30 my %ids = map { $_ => 1 } @ids;
    31 31 my @values = exists $prop->{values} && ref $prop->{values} eq 'ARRAY' ? @{ $prop->{values} } :
    32 32 exists $prop->{cases} && ref $prop->{cases} eq 'ARRAY' ? @{ $prop->{cases} } : ();
    33 33
    34 $error = '�� ��������� ����� �������� ��� ����' unless @values;
    34 $error = 'Не определен набор значений для поля' unless @values;
    35 35
    36 36 </%init>