X-Git-Url: http://gitweb.michael.orlitzky.com/?p=email-validator.git;a=blobdiff_plain;f=src%2FMain.hs;h=9b22f5cfa20afe00ac3b82160a743781061ae754;hp=d2346c427f18845d932631e7250001326e387190;hb=80e83309f0de0b4b89002564c94d9d988924bf9e;hpb=2a7f245979ec1dc33657cba9ee14144a77e45e25

diff --git a/src/Main.hs b/src/Main.hs
index d2346c4..9b22f5c 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -60,12 +60,6 @@ validate_mx resolver domain
         _       -> return True
 
 
--- | Validate the syntax of an email address by checking its length
---   and validating it against a simple regex.
-validate_syntax :: Address -> Bool
-validate_syntax address =
-  (validate_length address) && (validate_regex address)
-
 
 -- | Validate an email address by doing some simple syntax checks and
 --   (if those fail) an MX lookup. We don't count an A record as a mail