port the reaction type system to MooseX::Types

[catagits/Reaction.git] / lib / Reaction / Types / Email.pm

diff --git a/lib/Reaction/Types/Email.pm b/lib/Reaction/Types/Email.pm
index 0bf9adc..faa165f 100644 (file)
--- a/lib/Reaction/Types/Email.pm
+++ b/lib/Reaction/Types/Email.pm
@@ -1,6 +1,9 @@
 package Reaction::Types::Email;
 
-use Moose::Util::TypeConstraints;
+use MooseX::Types
+    -declare => [qw/EmailAddress/];
+
+use Reaction::Types::Core 'NonEmptySimpleStr';
 use Email::Valid;
 
 subtype 'EmailAddress'