1 files changed, 42 insertions, 0 deletions
diff --git a/lib/Moose/Exception/OverrideConflictInComposition.pm b/lib/Moose/Exception/OverrideConflictInComposition.pm
new file mode 100644
index 0000000..44bfd78
--- /dev/null
+++ b/lib/Moose/Exception/OverrideConflictInComposition.pm
@@ -0,0 +1,42 @@
+package Moose::Exception::OverrideConflictInComposition;
+our $VERSION = '2.1405';
+
+use Moose;
+extends 'Moose::Exception';
+with 'Moose::Exception::Role::Role';
+
+has 'role_being_applied_name' => (
+    is       => 'ro',
+    isa      => 'Str',
+    required => 1
+);
+
+has 'method_name' => (
+    is       => 'ro',
+    isa      => 'Str',
+    required => 1
+);
+
+has 'two_overrides_found' => (
+    is       => 'ro',
+    isa      => 'Bool',
+    required => 1,
+    default  => 0
+);
+
+sub _build_message {
+    my $self = shift;
+
+    if( $self->two_overrides_found ) {
+        return "Role '" . $self->role_being_applied_name . "' has encountered an 'override' method conflict " .
+               "during composition (Two 'override' methods of the same name encountered). " .
+               "This is a fatal error.";
+    }
+    else {
+        return "Role '".$self->role_being_applied_name."' has encountered an 'override' method conflict ".
+               "during composition (A local method of the same name as been found). ".
+               "This is a fatal error.";
+    }
+}
+
+1;