[Catalyst-commits] r8397 - in CatalystX-CRUD/CatalystX-CRUD-ModelAdapter-DBIC/trunk: . lib/CatalystX/CRUD/ModelAdapter

[karpet at dev.catalyst.perl.org]

Author: karpet
Date: 2008-09-11 05:53:24 +0100 (Thu, 11 Sep 2008)
New Revision: 8397

Modified:
   CatalystX-CRUD/CatalystX-CRUD-ModelAdapter-DBIC/trunk/Changes
   CatalystX-CRUD/CatalystX-CRUD-ModelAdapter-DBIC/trunk/lib/CatalystX/CRUD/ModelAdapter/DBIC.pm
Log:
 get relationships from source not class

Modified: CatalystX-CRUD/CatalystX-CRUD-ModelAdapter-DBIC/trunk/Changes
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD-ModelAdapter-DBIC/trunk/Changes	2008-09-10 22:11:23 UTC (rev 8396)
+++ CatalystX-CRUD/CatalystX-CRUD-ModelAdapter-DBIC/trunk/Changes	2008-09-11 04:53:24 UTC (rev 8397)
@@ -24,5 +24,7 @@
 0.07    xxx
         * implement Utils features for ne_sign() use_ilike() and treat_like_int()
         * tweek make_sql_query() output to match DBIC syntax for -or and -and searches
+        * get relationships from source not class
 
 
+

Modified: CatalystX-CRUD/CatalystX-CRUD-ModelAdapter-DBIC/trunk/lib/CatalystX/CRUD/ModelAdapter/DBIC.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD-ModelAdapter-DBIC/trunk/lib/CatalystX/CRUD/ModelAdapter/DBIC.pm	2008-09-10 22:11:23 UTC (rev 8396)
+++ CatalystX-CRUD/CatalystX-CRUD-ModelAdapter-DBIC/trunk/lib/CatalystX/CRUD/ModelAdapter/DBIC.pm	2008-09-11 04:53:24 UTC (rev 8397)
@@ -444,7 +444,7 @@
         if exists $self->{_field_names};
 
     my $obj
-        = $c->model( $self->model_name )->composed_schema->class($moniker);
+        = $c->model( $self->model_name )->composed_schema->source($moniker);
     my @cols = $obj->columns;
     my @rels = $obj->relationships;