X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FSchema.pm;h=71faab7da5f049c10067d806995dc227929e46ca;hb=9901aad73ff9dc45b426534fe406c102fb9fb77c;hp=5cb37fb6e714e7e4c0205f9cf2203a18da208ce4;hpb=03e3321aba8d719195bf8a875e121e2b30e6655b;p=dbsrgits%2FDBIx-Class-Historic.git

diff --git a/lib/DBIx/Class/Schema.pm b/lib/DBIx/Class/Schema.pm
index 5cb37fb..71faab7 100644
--- a/lib/DBIx/Class/Schema.pm
+++ b/lib/DBIx/Class/Schema.pm
@@ -1280,6 +1280,7 @@ sub _register_source {
   $self->source_registrations(\%reg);
 
   return if ($params->{extra});
+  return unless defined($rs_class) && $rs_class->can('result_source_instance');
 
   my %map = %{$self->class_mappings};
   if (