package Podius::Component::Section; use base 'Podius::Component::Page'; use Podius::Property::ComponentCollection; use Podius::Property::VComponentCollection; use Podius::Property::Image; sub get_own_property_types () { return [ [ sections => 'ComponentCollection' , 'Section' ], [ products => 'VComponentCollection', 'Product' ], [ articles => 'VComponentCollection', 'Article' ], [ large_image => 'Image', 'images/auto/Section/default1.gif', 'Default Label' ], [ small_image => 'Image', 'images/auto/Section/default2.gif', 'Default Label' ], ]; } sub get_name ($) { my $self = shift; return $self->phrase || $self->get_id; } 1;