ResolvConf(resolvInfo, resolvTimeout),
defaultResolvConf,
makeResolvSeed,
+ normalize,
+ normalizeCase,
withResolver )
import System.Exit (ExitCode(..), exitWith)
import System.IO (hPutStrLn, stderr)
LookupResult,
lookupMX',
lookupNS',
- normalize,
- normalize_case,
resolve_address )
import ExitCodes (exit_bad_server)
import Timeout (Timeout(..))
let normalize_function =
if (no_append_root cfg)
- then normalize_case
+ then normalizeCase
else normalize
-- Normalize the given names and delegates