package users::Init; use strict; use warnings 'all'; use Contenido::Globals; use users::Apache; use users::Keeper; # загрузка всех необходимых плагину классов # users::SQL::SomeTable # users::SomeClass Contenido::Init::load_classes(qw( users::SQL::UserProfile users::UserProfile users::Section )); sub init { push @{ $state->{'available_documents'} }, 'users::UserProfile' if $state->{users}->profile_document_class eq 'users::UserProfile'; push @{ $state->{'available_sections'} }, 'users::Section'; 0; } 1;