package promosuite::Promoblock; use strict; use vars qw(@ISA); use Contenido::Document; use Time::ParseDate; use Contenido::Globals; @ISA = ('Contenido::Document'); sub extra_properties { return ( { 'attr' => 'name', 'rusname' => 'Заголовок промоблока' }, { 'attr' => 'abstr', 'type' => 'text', 'rusname' => 'Аннотация', 'rows' => 10 }, { 'attr' => 'url', 'type' => 'string', 'rusname' => 'URL перехода' }, { 'attr' => 'html', 'type' => 'text', 'rusname' => 'Верстка промоблока (заменит стандартную верстку в компоненте)', rows => 20 }, { 'attr' => 'picture', 'type' => 'image', 'rusname' => 'Картинка в промоблоке', preview => '100x100' }, { 'attr' => 'pictures', 'type' => 'images', 'rusname' => 'Картинки для верстки' }, ) } sub class_name { return 'Промоблок'; } sub class_description { return 'Промоблок'; } 1;