And to put this in smaller terms:

> use Handel::Cart::Schema;
> 
> my $schema = Handel::Cart::Schema->connect($ENV{HandelDBIDSN});
> my $new = $schema->compose_namespace('Foo');
> 
> print $schema->class('Items'), "\n";
> print $new->class('Items'), "\n";
> 
> print $schema->class('Items')->result_source_instance, "\n";
> print $new->class('Items')->result_source_instance, "\n";
> 
> print $schema->source('Items'), "\n";
> print $new->source('Items'), "\n";





prints:


> Handel::Schema::Cart::Item
> Foo::Items
> DBIx::Class::ResultSource::Table=HASH(0x1bb09d0)
> DBIx::Class::ResultSource::Table=HASH(0x1bb09d0)
> DBIx::Class::ResultSource::Table=HASH(0x22c3d8c)
> DBIx::Class::ResultSource::Table=HASH(0x24a7bd4)



After a clone, I'd expect the first two outputs to a) not be the same,
and b) possibly match the latter two.


-=Chris

Attachment: signature.asc
Description: OpenPGP digital signature

_______________________________________________
List: http://lists.rawmode.org/cgi-bin/mailman/listinfo/dbix-class
Wiki: http://dbix-class.shadowcatsystems.co.uk/
IRC: irc.perl.org#dbix-class
SVN: http://dev.catalyst.perl.org/repos/bast/trunk/DBIx-Class/
Searchable Archive: http://www.mail-archive.com/[email protected]/

Reply via email to