make dynamic schemas 0.04006 mode by default

diff --git a/lib/DBIx/Class/Schema/Loader/Base.pm b/lib/DBIx/Class/Schema/Loader/Base.pm
index 575345c..51bf652 100644 (file)
--- a/lib/DBIx/Class/Schema/Loader/Base.pm
+++ b/lib/DBIx/Class/Schema/Loader/Base.pm
@@ -339,6 +339,7 @@ sub _check_back_compat {
     if ($self->{dynamic}) {
         no strict 'refs';
         my $class = ref $self || $self;
+        require DBIx::Class::Schema::Loader::Compat::v0_040;
         unshift @{"${class}::ISA"},
             'DBIx::Class::Schema::Loader::Compat::v0_040';
         Class::C3::reinitialize;

diff --git a/t/backcompat/0.04006/10sqlite_common.t b/t/backcompat/0.04006/10sqlite_common.t
index 7899cf6..b28f1ac 100644 (file)
--- a/t/backcompat/0.04006/10sqlite_common.t
+++ b/t/backcompat/0.04006/10sqlite_common.t
@@ -1,5 +1,5 @@
 use strict;
-use lib qw(t/lib);
+use lib qw(t/backcompat/0.04006/lib);
 use dbixcsl_common_tests;
 
 eval { require DBD::SQLite };