Use Moose->throw_error to throw errors

diff --git a/lib/Moose/Meta/TypeConstraint.pm b/lib/Moose/Meta/TypeConstraint.pm
index 3e370dc..1f657ca 100644 (file)
--- a/lib/Moose/Meta/TypeConstraint.pm
+++ b/lib/Moose/Meta/TypeConstraint.pm
@@ -130,8 +130,10 @@ sub validate {
 sub _inline_check {
     my $self = shift;
 
-    die 'Cannot inline a type constraint check for ' . $self->name
-        unless $self->has_inlined_type_constraint;
+    unless ( $self->has_inlined_type_constraint ) {
+        require Moose;
+        Moose->throw_error( 'Cannot inline a type constraint check for ' . $self->name );
+    }
 
     return $self->inlined->( $self, @_ );
 }