From: Dagfinn Ilmari Mannsåker Date: Fri, 16 Feb 2018 16:52:27 +0000 (+0000) Subject: Move comment about storage_type next to the relevant code X-Git-Tag: v0.07048_01~4 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5939bf085ba9426e336f300b5b25e17078ba7e65;p=dbsrgits%2FDBIx-Class-Schema-Loader.git Move comment about storage_type next to the relevant code --- diff --git a/lib/DBIx/Class/Schema/Loader.pm b/lib/DBIx/Class/Schema/Loader.pm index 9bbaafb..05d951f 100644 --- a/lib/DBIx/Class/Schema/Loader.pm +++ b/lib/DBIx/Class/Schema/Loader.pm @@ -187,13 +187,13 @@ sub _invoke_loader { $args->{naming} = $self->naming if $self->naming; $args->{use_namespaces} = $self->use_namespaces if defined $self->use_namespaces; - # XXX this only works for relative storage_type, like ::DBI ... my $loader_class = $self->loader_class; if ($loader_class) { $loader_class = "DBIx::Class::Schema::Loader${loader_class}" if $loader_class =~ /^::/; $args->{loader_class} = $loader_class; }; + # XXX this only works for relative storage_type, like ::DBI ... my $impl = $loader_class || "DBIx::Class::Schema::Loader" . $self->storage_type; try { $self->ensure_class_loaded($impl)