Moose::Exception::TypeConstraint is no longer a role

[gitmo/Moose.git] / lib / Moose / Meta / Attribute.pm

diff --git a/lib/Moose/Meta/Attribute.pm b/lib/Moose/Meta/Attribute.pm
index e68bb6e..f0156fd 100644 (file)
--- a/lib/Moose/Meta/Attribute.pm
+++ b/lib/Moose/Meta/Attribute.pm
@@ -692,7 +692,7 @@ sub _inline_check_constraint {
                   . 'do { local $_ = ' . $value . '; '
                       . $message . '->(' . $value . ')'
                   . '}',
-                    'roles => ["Moose::Exception::TypeConstraint"]',
+                    'class => "Moose::Exception::TypeConstraint"',
                     'attribute_name => ' . $self->name,
                     'type_name => ' . $self->type_constraint->name,
                     'value => ' . $value,
@@ -709,7 +709,7 @@ sub _inline_check_constraint {
                   . 'do { local $_ = ' . $value . '; '
                       . $message . '->(' . $value . ')'
                   . '}',
-                    'roles => ["Moose::Exception::TypeConstraint"]',
+                    'class => "Moose::Exception::TypeConstraint"',
                     'attribute_name => ' . $self->name,
                     'type_name => ' . $self->type_constraint->name,
                     'value => ' . $value,