import Network.DNS (
Domain,
Resolver,
- ResolvConf(..),
+ ResolvConf( resolvTimeout ),
defaultResolvConf,
makeResolvSeed,
withResolver )
import Network.DNS.Lookup ( lookupA, lookupMX )
import System.Directory ( doesFileExist )
-import System.Exit ( exitWith, ExitCode(..) )
+import System.Exit ( exitWith, ExitCode( ExitFailure ) )
import System.IO (
IOMode( WriteMode ),
hClose,
stdout )
-import CommandLine ( Args(..), get_args )
+import CommandLine (
+ Args( Args, accept_a, input_file, output_file, rfc5322 ),
+ get_args )
import EmailAddress(
Address,
parts,