X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2FDynamicMoose%2FClassOverridesRole.run;h=3680ee3bdfefba0339a1113df7a82d60a0afa062;hb=refs%2Fheads%2Fmaster;hp=1a62da91f0128a1476ccae049d186b7869618f84;hpb=0e9d2f3d0d627a4f775a4a397b5bebd0f592e5b6;p=gitmo%2FPerl-Critic-Dynamic-Moose.git

diff --git a/t/DynamicMoose/ClassOverridesRole.run b/t/DynamicMoose/ClassOverridesRole.run
index 1a62da9..3680ee3 100644
--- a/t/DynamicMoose/ClassOverridesRole.run
+++ b/t/DynamicMoose/ClassOverridesRole.run
@@ -85,3 +85,29 @@ with 'Role' => { alias => { foo => 'foo_bar' } };
 
 sub foo {}
 
+
+#-----------------------------------------------------------------------------
+
+## name Collision via same role
+## failures 0
+## cut
+
+package Ur::Role;
+use Moose::Role;
+
+sub foo { die "yawr" }
+
+package Role::Refined;
+use Moose::Role;
+with 'Ur::Role';
+
+package Role::Distinguished;
+use Moose::Role;
+with 'Ur::Role';
+
+package Class;
+use Moose;
+
+with 'Role::Refined';
+with 'Role::Distinguished';
+