X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FResultSetManager.pm;h=e4adae57a6fdc2e60c7a78a3ef3b9b85f7574c9d;hb=d8cf3aa31fb3d6ff7813f021fcc002663725fc41;hp=addc8c36fb715e8e0ad15d1f60d63ddf198921f7;hpb=b090048f6d8bd2cba0bae8ea7ec26459dd20dca8;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/ResultSetManager.pm b/lib/DBIx/Class/ResultSetManager.pm index addc8c3..e4adae5 100644 --- a/lib/DBIx/Class/ResultSetManager.pm +++ b/lib/DBIx/Class/ResultSetManager.pm @@ -88,12 +88,11 @@ sub _register_resultset_class { my $self = shift; my $resultset_class = $self . $self->table_resultset_class_suffix; no strict 'refs'; - if (@{"$resultset_class\::ISA"}) { - $self->result_source_instance->resultset_class($resultset_class); - } else { - $self->result_source_instance->resultset_class - ($self->base_resultset_class); - } + $self->result_source->resultset_class( + ( scalar @{"${resultset_class}::ISA"} ) + ? $resultset_class + : $self->base_resultset_class + ); } =head1 FURTHER QUESTIONS?