X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FResultSourceInstance.pm;h=732082665e3dffb92829cafbc35116c3b236f484;hb=a9433341369da32eafd7509f49477b44c84bcbeb;hp=3b1a92e48fc34e0813de10ae630d5766d39bb839;hpb=1f23a8774ca0b1a210e4c94f4a0d494bd5bc1f07;p=dbsrgits%2FDBIx-Class.git

diff --git a/lib/DBIx/Class/ResultSourceInstance.pm b/lib/DBIx/Class/ResultSourceInstance.pm
index 3b1a92e..7320826 100644
--- a/lib/DBIx/Class/ResultSourceInstance.pm
+++ b/lib/DBIx/Class/ResultSourceInstance.pm
@@ -17,10 +17,6 @@ sub add_columns {
   }
 }
 
-sub _select_columns {
-  return shift->result_source_instance->columns;
-}
-
 sub has_column {                                                                
   my ($self, $column) = @_;                                                     
   return $self->result_source_instance->has_column($column);                    
@@ -40,7 +36,10 @@ sub set_primary_key { shift->result_source_instance->set_primary_key(@_); }
 sub primary_columns { shift->result_source_instance->primary_columns(@_); }
 
 sub add_relationship {
-  shift->result_source_instance->add_relationship(@_);
+  my ($class, $rel, @rest) = @_;
+  my $source = $class->result_source_instance;
+  $source->add_relationship($rel => @rest);
+  $class->register_relationship($rel => $source->relationship_info($rel));
 }
 
 sub relationships {