added new fatal error if loader_options not yet specified at clone() time

[dbsrgits/DBIx-Class-Schema-Loader.git] / lib / DBIx / Class / Schema / Loader.pm

diff --git a/lib/DBIx/Class/Schema/Loader.pm b/lib/DBIx/Class/Schema/Loader.pm
index abbbf48..aee970d 100644 (file)
--- a/lib/DBIx/Class/Schema/Loader.pm
+++ b/lib/DBIx/Class/Schema/Loader.pm
@@ -4,7 +4,7 @@ use strict;
 use warnings;
 use base qw/DBIx::Class::Schema/;
 use base qw/Class::Data::Accessor/;
-use Carp;
+use Carp::Clan qw/^DBIx::Class::Schema::Loader/;
 use UNIVERSAL::require;
 use Class::C3;
 use Scalar::Util qw/ weaken /;
@@ -147,6 +147,9 @@ See L<DBIx::Class::Schema>.
 sub clone {
     my $self = shift;
 
+    croak "You failed to specify the required loader_options"
+        if !$self->_loader_args;
+
     my $clone = $self->next::method(@_);
 
     $clone->_loader_args($self->_loader_args);