Use MRO::Compat instead of Class::C3 directly.
Florian Ragwitz [Wed, 18 Mar 2009 19:02:07 +0000 (19:02 +0000)]
Makefile.PL
t/04dont_break_c3.t

index f8cbe67..887bb17 100644 (file)
@@ -13,7 +13,7 @@ requires 'Data::Page'               => 2.00;
 requires 'Scalar::Util'             => 0;
 requires 'SQL::Abstract'            => 1.49;
 requires 'SQL::Abstract::Limit'     => 0.13;
-requires 'Class::C3'                => 0.20;
+requires 'MRO::Compat'              => 0;
 requires 'Class::C3::Componentised' => 1.0003;
 requires 'Storable'                 => 0;
 requires 'Carp::Clan'               => 0;
index 5869869..d5cb5d1 100644 (file)
@@ -4,6 +4,7 @@
 
 use strict;
 use Test::More tests => 2;
+use MRO::Compat;
 
 {
 package AAA;
@@ -26,8 +27,8 @@ use base 'AAA';
 __PACKAGE__->inject_base( __PACKAGE__, 'DBIx::Class::Core' );
 }
 
-eval { Class::C3::calculateMRO('BBB'); };
+eval { mro::get_linear_isa('BBB'); };
 ok (! $@, "Correctly skipped injecting a direct parent of class BBB");
 
-eval { Class::C3::calculateMRO('CCC'); };
+eval { mro::get_linear_isa('CCC'); };
 ok (! $@, "Correctly skipped injecting an indirect parent of class BBB");