Catalyst::TraitFor::Model::DBIC::Schema::PerRequestSchema(3) Clone the schema


traits => ['PerRequestSchema'],
sub per_request_schema_attributes {
my ($self, $c) = @_;
return (restricting_object => $c->user->obj);
### OR ###
sub per_request_schema {
my ($self, $c) = @_;
return $self->schema->schema_method($c->user->obj)


Clones the schema for each new request with the attributes retrieved from your "per_request_schema_attributes" method, which you must implement. This method is passed the context.

Alternatively, you could also override the "per_request_schema" method if you need access to the schema clone and/or need to separate out the Model/Schema methods. (See examples above and the defaults in the code.)


See ``AUTHOR'' in Catalyst::Model::DBIC::Schema and ``CONTRIBUTORS'' in Catalyst::Model::DBIC::Schema.


See ``COPYRIGHT'' in Catalyst::Model::DBIC::Schema.


This program is free software, you can redistribute it and/or modify it under the same terms as Perl itself.