}
);
-# FIXME - Move all the Pod to the bottom!
-
-=head1 NAME
-
-Catalyst::Container - IOC for Catalyst components
-
-=head1 METHODS
-
-=cut
-
sub BUILD {
my $self = shift;
) for qw/ model view controller /;
}
-=head2 build_model_subcontainer
-
-=cut
-
sub build_model_subcontainer {
my $self = shift;
return $self->new_sub_container( name => 'model' );
}
-=head2 build_view_subcontainer
-
-=cut
-
sub build_view_subcontainer {
my $self = shift;
return $self->new_sub_container( name => 'view' );
}
-=head2 build_controller_subcontainer
-
-=cut
-
sub build_controller_subcontainer {
my $self = shift;
return $self->new_sub_container( name => 'controller' );
}
-=head2 build_name_service
-
-=cut
-
sub build_name_service {
my $self = shift;
return Bread::Board::Literal->new( name => 'name', value => $self->name );
}
-=head2 build_driver_service
-
-=cut
-
sub build_driver_service {
my $self = shift;
return Bread::Board::Literal->new( name => 'driver', value => $self->driver );
}
-=head2 build_file_service
-
-=cut
-
sub build_file_service {
my $self = shift;
return Bread::Board::Literal->new( name => 'file', value => $self->file );
}
-=head2 build_substitutions_service
-
-=cut
-
sub build_substitutions_service {
my $self = shift;
return Bread::Board::Literal->new( name => 'substitutions', value => $self->substitutions );
}
-=head2 build_extensions_service
-
-=cut
-
sub build_extensions_service {
my $self = shift;
);
}
-=head2 build_prefix_service
-
-=cut
-
sub build_prefix_service {
my $self = shift;
);
}
-=head2 build_path_service
-
-=cut
-
sub build_path_service {
my $self = shift;
);
}
-=head2 build_config_service
-
-=cut
-
sub build_config_service {
my $self = shift;
);
}
-=head2 build_raw_config_service
-
-=cut
-
sub build_raw_config_service {
my $self = shift;
);
}
-=head2 build_global_files_service
-
-=cut
-
sub build_global_files_service {
my $self = shift;
);
}
-=head2 build_local_files_service
-
-=cut
-
sub build_local_files_service {
my $self = shift;
);
}
-=head2 build_global_config_service
-
-=cut
-
sub build_global_config_service {
my $self = shift;
);
}
-=head2 build_local_config_service
-
-=cut
-
sub build_local_config_service {
my $self = shift;
);
}
-=head2 build_config_path_service
-
-=cut
-
sub build_config_path_service {
my $self = shift;
);
}
-=head2 build_config_local_suffix_service
-
-=cut
-
sub build_config_local_suffix_service {
my $self = shift;
);
}
-=head2 _fix_syntax
-
-=cut
-
sub _fix_syntax {
my $config = shift;
my @components = (
}
}
-=head2 _config_substitutions
-
-=cut
-
sub _config_substitutions {
my ( $self, $name, $subs, $arg ) = @_;
return $arg;
}
+1;
+
+__END__
+
+=pod
+
+=head1 NAME
+
+Catalyst::Container - IOC for Catalyst components
+
+=head1 METHODS
+
+=head2 build_model_subcontainer
+
+=head2 build_view_subcontainer
+
+=head2 build_controller_subcontainer
+
+=head2 build_name_service
+
+=head2 build_driver_service
+
+=head2 build_file_service
+
+=head2 build_substitutions_service
+
+=head2 build_extensions_service
+
+=head2 build_prefix_service
+
+=head2 build_path_service
+
+=head2 build_config_service
+
+=head2 build_raw_config_service
+
+=head2 build_global_files_service
+
+=head2 build_local_files_service
+
+=head2 build_global_config_service
+
+=head2 build_local_config_service
+
+=head2 build_config_path_service
+
+=head2 build_config_local_suffix_service
+
+=head2 _fix_syntax
+
+=head2 _config_substitutions
+
=head1 AUTHORS
Catalyst Contributors, see Catalyst.pm
the same terms as Perl itself.
=cut
-
-1;