package promosuite::Voting; use Contenido::Document; @ISA = ('Contenido::Document'); sub extra_properties { return ( { 'attr' => 'status', 'type' => 'status', 'rusname' => 'Состояние Конкурса / Опроса', 'cases' => [ [0, 'Скрытый (не отображается и не показывается)'], [1, 'Активный (сейчас работает)'], [2, 'Закончен'], [3, 'Закончен и обсчитан'], ], }, { 'attr' => 'email', 'type' => 'string', 'rusname' => 'E-mail для получения результатов' }, { 'attr' => 'visible', 'type' => 'checkbox', 'rusname' => 'показывать результаты' }, { 'attr' => 'abstr', 'type' => 'text', 'rusname' => 'Описание конкурса / опроса', rows=>3 }, { 'attr' => 'submit', 'type' => 'text', 'rusname' => 'Текст после заполнения ответов', rows=>3 }, { 'attr' => 'filled', 'type' => 'text', 'rusname' => 'Текст для тех, кто уже заполнил опрос', rows=>3 }, { 'attr' => 'finished', 'type' => 'text', 'rusname' => 'Текст для оконченного конкурса / опроса', rows=>3 }, { 'attr' => 'voting', 'type' => 'multi_vote', 'rusname' => 'список вопросов' }, { 'attr' => 'logo', 'type' => 'image', 'rusname' => 'логотип' }, { 'attr' => 'pictures', 'type' => 'images', 'rusname' => 'Картинки к конкурсу / опросу' }, ); } sub class_name { return 'Конкурс / опрос'; } sub class_description { return 'Описание конкурса для encuesta (несколько вопросов с набором ответов)'; } sub contenido_status_style { my $self = shift; if ( $self->status == 3 ) { return 'color:red;'; } if ( $self->status == 2 ) { return 'color:green;'; } } 1;