Repository List / Contenido / utf8 / samples / promosuite / lib / promosuite / Multimedia.pm @ r296

package promosuite::Multimedia;

use strict;
use vars qw(@ISA);

use Contenido::Document;
use Time::ParseDate;
use Contenido::Globals;

@ISA = ('Contenido::Document');

sub extra_properties
{

	return (
		{ 'attr' => 'attype',	'type' => 'select',	'rusname' => 'Тип прикрепленного документа' },
		{ 'attr' => 'abstr',	'type' => 'text',	'rusname' => 'Аннотация',	'rows' => 10 },
		{ 'attr' => 'body',	'type' => 'text',	'rusname' => 'Описание',	'rows' => 40 },
		{ 'attr' => 'file',	'type' => 'multimedia_new',	'rusname' => 'Прикрепленный файл', softrename => 1 },
		{ 'attr' => 'icon',	'type' => 'image',	'rusname' => 'Фото для выноски','preview' => ['100x100'] },
		{ 'attr' => 'photo',	'type' => 'image',	'rusname' => 'Фото в тексте',	'preview' => ['100x100','150x150','200x200'] },
		{ 'attr' => 'zoom',	'type' => 'image',	'rusname' => 'Hi-Res Фотo',	'preview' => ['400x400','200x200','150x150','100x100'] },
		{ 'attr' => 'photoset',	'type' => 'images',	'rusname' => 'Фотосет',		'preview' => ['150x150','200x200'] },
	)
}

sub class_name
{
	return 'Мультимедийный объект';
}

sub class_description
{
	 return 'Описание мультимедийного объекта';
}

1;