|
NAMECatalyst::TraitFor::Model::DBIC::Schema::SchemaProxy - Proxy Schema Methods and Options from ModelDESCRIPTIONAllows you to call your DBIx::Class::Schema methods directly on the Model instance, and passes config options to your DBIx::Class::Schema and DBIx::Class::ResultSet attributes at "BUILD" time.Methods and attributes local to your "Model" take precedence over DBIx::Class::Schema or DBIx::Class::ResultSet methods and attributes. CREATING SCHEMA CONFIG ATTRIBUTESTo create attributes in your "Schema.pm", use either Moose or Class::Accessor::Grouped, which is inherited from by all DBIx::Class classes automatically. E.g.:__PACKAGE__->mk_group_accessors(simple => qw/ config_key1 config_key2 ... /); Or with Moose: use Moose; has config_key1 => (is => 'rw', default => 'default_value'); This code can be added after the md5sum on DBIx::Class::Schema::Loader generated schemas. At app startup, any non-local options will be passed to these accessors, and can be accessed as usual via "$schema->config_key1". These config values go into your "Model::DB" block, along with normal config values. CREATING RESULTSET CONFIG ATTRIBUTESYou can create classdata on DBIx::Class::ResultSet classes to hold values from Catalyst config.The code for this looks something like this: package MySchema::ResultSet::Foo; use base 'DBIx::Class::ResultSet'; __PACKAGE__->mk_group_accessors(inherited => qw/ rs_config_key1 rs_config_key2 ... /); __PACKAGE__->rs_config_key1('default_value'); Or, if you prefer Moose: package MySchema::ResultSet::Foo; use Moose; use MooseX::NonMoose; use MooseX::ClassAttribute; extends 'DBIx::Class::ResultSet'; sub BUILDARGS { $_[2] } # important class_has rs_config_key1 => (is => 'rw', default => 'default_value'); ... __PACKAGE__->meta->make_immutable; 1; In your catalyst config, use the generated Model name as the config key, e.g.: <Model::DB::Users> strict_passwords 1 </Model::DB::Users> SEE ALSOCatalyst::Model::DBIC::Schema, DBIx::Class::SchemaAUTHORSee "AUTHOR" in Catalyst::Model::DBIC::Schema and "CONTRIBUTORS" in Catalyst::Model::DBIC::Schema.COPYRIGHTSee "COPYRIGHT" in Catalyst::Model::DBIC::Schema.LICENSEThis program is free software, you can redistribute it and/or modify it under the same terms as Perl itself.
Visit the GSP FreeBSD Man Page Interface. |