Expand the c3 mro test from d009cb7d

No functional changes

diff --git a/lib/DBIx/Class/AccessorGroup.pm b/lib/DBIx/Class/AccessorGroup.pm
index 5ac4651..7c6dece 100644 (file)
--- a/lib/DBIx/Class/AccessorGroup.pm
+++ b/lib/DBIx/Class/AccessorGroup.pm
@@ -4,6 +4,8 @@ use strict;
 use warnings;
 
 use base qw/Class::Accessor::Grouped/;
+use mro 'c3';
+
 use Scalar::Util qw/weaken blessed/;
 use DBIx::Class::_Util 'fail_on_internal_call';
 use namespace::clean;

diff --git a/xt/extra/c3_mro.t b/xt/extra/c3_mro.t
index db60402..fad386a 100644 (file)
--- a/xt/extra/c3_mro.t
+++ b/xt/extra/c3_mro.t
@@ -16,10 +16,10 @@ my @global_ISA_tail = qw(
 );
 
 is(
-  mro::get_mro('DBIx::Class'),
+  mro::get_mro($_),
   'c3',
-  'Correct mro on base class DBIx::Class',
-);
+  "Correct mro on base class '$_'",
+) for grep { $_ =~ /^DBIx::Class/ } @global_ISA_tail;
 
 {
   package AAA;