package promosuite::Event; use strict; use promosuite::SQL::SampleTable; use base 'Contenido::Document'; sub extra_properties { return ( { 'attr' => 'abstr', 'type' => 'text', 'rusname' => 'Аннотация', 'rows' => 10 }, ) } sub class_name { return 'Событие'; } sub class_description { return 'Событие'; } sub class_table { return 'promosuite::SQL::Events'; } 1;