From: Dave Rolsky <autarch@urth.org>
Date: Fri, 30 Dec 2011 20:43:37 +0000 (-0600)
Subject: Another test for the interaction of a conflicting method with aliasing
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=66c51e9d1dde7f623ee50704ca3d5c9ec1adf134;p=gitmo%2FMoose.git

Another test for the interaction of a conflicting method with aliasing
---

diff --git a/t/roles/role_conflict_detection.t b/t/roles/role_conflict_detection.t
index 255e2a3..7143596 100644
--- a/t/roles/role_conflict_detection.t
+++ b/t/roles/role_conflict_detection.t
@@ -442,6 +442,19 @@ is(Role::Reality->meta->get_method('twist')->(),
     );
 }
 
+{
+    package UsesAlso4;
+    use Moose;
+
+    sub bar {}
+
+    ::is(
+        ::exception{ with 'AlsoHasFooMeth', { -alias => { bar => 'foo' } } },
+        undef,
+        'aliasing one of the conflicting methods as part of consuming the role supresses the conflict error'
+    );
+}
+
 =pod
 
 Role conflicts between attributes and methods