Revision 474 (by ahitrov, 2015/02/25 13:22:42) |
Tags plugin
|
package tags::Tag;
use base 'Contenido::Document';
use Contenido::Globals;
sub extra_properties
{
return (
{ 'attr' => 'name', 'rusname' => 'Название тега', shortname => 'Тег' },
)
}
sub class_name
{
return 'Тег';
}
sub class_description
{
return 'Тег';
}
sub class_table
{
return 'tags::SQL::TagsTable';
}
sub search_fields {
return ('name');
}
sub pre_store
{
my $self = shift;
my $default_section = $project->s_alias->{tags} if ref $project->s_alias eq 'HASH' && exists $project->s_alias->{tags};
$self->sections( $default_section ) if $default_section;
return 1;
}
1;