open Ast
-val dl = ErrorMsg.dummyLoc
-
-val _ = Defaults.registerDefault ("MailNodes",
- (TList (TBase "mail_node", dl), dl),
- (fn () => (EList (map (fn s => (EString s, dl)) Config.Exim.aliasTo), dl)))
-
val aliasesChanged = ref false
val aliasesDefaultChanged = ref false
val hostsChanged = ref false