diff options
Diffstat (limited to 'lib/Reaction/Types/Email.pm')
-rw-r--r-- | lib/Reaction/Types/Email.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/Reaction/Types/Email.pm b/lib/Reaction/Types/Email.pm index a82d16f..01660a3 100644 --- a/lib/Reaction/Types/Email.pm +++ b/lib/Reaction/Types/Email.pm @@ -6,10 +6,10 @@ use MooseX::Types use Reaction::Types::Core 'NonEmptySimpleStr'; use Email::Valid; -subtype EmailAddress - => as NonEmptySimpleStr - => where { Email::Valid->address($_) } - => message { "Must be a valid e-mail address" }; +subtype EmailAddress, + as NonEmptySimpleStr, + where { Email::Valid->address($_) }, + message { "Must be a valid e-mail address" }; 1; |