Line # Revision Author
1 296 ahitrov package promosuite::Promoblock;
2
3 use strict;
4 use vars qw(@ISA);
5
6 use Contenido::Document;
7 use Time::ParseDate;
8 use Contenido::Globals;
9
10 @ISA = ('Contenido::Document');
11
12 sub extra_properties
13 {
14
15 return (
16 { 'attr' => 'name', 'rusname' => 'Заголовок промоблока' },
17 { 'attr' => 'abstr', 'type' => 'text', 'rusname' => 'Аннотация', 'rows' => 10 },
18 { 'attr' => 'url', 'type' => 'string', 'rusname' => 'URL перехода' },
19 { 'attr' => 'html', 'type' => 'text', 'rusname' => 'Верстка промоблока (заменит стандартную верстку в компоненте)', rows => 20 },
20 { 'attr' => 'picture', 'type' => 'image', 'rusname' => 'Картинка в промоблоке', preview => '100x100' },
21 { 'attr' => 'pictures', 'type' => 'images', 'rusname' => 'Картинки для верстки' },
22 )
23 }
24
25 sub class_name
26 {
27 return 'Промоблок';
28 }
29
30 sub class_description
31 {
32 return 'Промоблок';
33 }
34
35 1;