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

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

diff --git a/lib/DBIx/Class/Schema/Loader/DBI.pm b/lib/DBIx/Class/Schema/Loader/DBI.pm
index aee9314..eb20dcb 100644 (file)
--- a/lib/DBIx/Class/Schema/Loader/DBI.pm
+++ b/lib/DBIx/Class/Schema/Loader/DBI.pm
@@ -4,7 +4,7 @@ use strict;
 use warnings;
 use base qw/DBIx::Class::Schema::Loader::Base Class::Accessor::Fast/;
 use Class::C3;
-use Carp;
+use Carp::Clan qw/^DBIx::Class::Schema::Loader/;
 use UNIVERSAL::require;
 
 =head1 NAME
@@ -40,7 +40,7 @@ sub new {
     my $subclass = 'DBIx::Class::Schema::Loader::DBI::' . $driver;
     $subclass->require;
     if($@ && $@ !~ /^Can't locate /) {
-        die "Failed to require $subclass: $@";
+        croak "Failed to require $subclass: $@";
     }
     elsif(!$@) {
         bless $self, "DBIx::Class::Schema::Loader::DBI::${driver}";