Hi,

This is exactly what I want to do, however I can't seem to get my head round
how to implement this solution, I've tried various incarnations but I don't
seem to be getting anywhere.

Annotations below, thanks for patience.

Scott


On 2/1/07, Juan Miguel Paredes <[EMAIL PROTECTED]> wrote:

On 2/1/07, Matt S Trout <[EMAIL PROTECTED]> wrote:
>
> package MyApp::DataStore; # or whatever this is called
>
> use base qw/DBIx::Class::Schema/;
>
> __PACKAGE__->mk_group_accessors(simple => 'context');



I get this bit, (also add DBIx::Class::AccessorGroup to the base class list)


then
>
> my $new = bless ...
>



> $new->schema(bless(...)); # same trick on the schema
>
> $new->schema->context($c);


Is the above in the same file? what should replace the ellipsis

then in the DBIC code
>
> $self->result_source->schema->context;
>
> make more sense?
>


Where exactly is the DBIC code? MyApp::Model::DataStore?

Indeed, your suggestion worked fine, thanks a lot!  Just had to add
DBIx::Class::AccessorGroup to the schema class

Regards,

Juan.

_______________________________________________
List: Catalyst@lists.rawmode.org
Listinfo: http://lists.rawmode.org/mailman/listinfo/catalyst
Searchable archive:
http://www.mail-archive.com/catalyst@lists.rawmode.org/
Dev site: http://dev.catalyst.perl.org/

_______________________________________________
List: Catalyst@lists.rawmode.org
Listinfo: http://lists.rawmode.org/mailman/listinfo/catalyst
Searchable archive: http://www.mail-archive.com/catalyst@lists.rawmode.org/
Dev site: http://dev.catalyst.perl.org/

Reply via email to