The server now accepts IPv6 connections.

[haskell-dns.git] / ExampleDNSServer.hs

diff --git a/ExampleDNSServer.hs b/ExampleDNSServer.hs
index 9fb8ee6e7ca3765a23b23e173483c2de1ee0a0fc..428f261856dd892fa8d8a2862996239eb8b91f9d 100644 (file)
--- a/ExampleDNSServer.hs
+++ b/ExampleDNSServer.hs
@@ -10,7 +10,7 @@ main = runNamed cnf (return . findZone)
     where
       cnf :: Config
       cnf = Config {
-              cnfServerAddress = SockAddrInet 9090 iNADDR_ANY
+              cnfServerPort    = "9090"
             , cnfAllowTransfer = True
             }