From: Rafael Kitover <rkitover@cpan.org>
Date: Sat, 28 Nov 2009 08:46:00 +0000 (+0000)
Subject: make dynamic schemas 0.04006 mode by default
X-Git-Tag: 0.04999_13~23^2~14
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=3c10a10f721ba093349b3aa7f543a0fea75e9c99;p=dbsrgits%2FDBIx-Class-Schema-Loader.git

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
--- 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
--- 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 };