X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=haskell-dns.git;a=blobdiff_plain;f=ExampleDNSServer.hs;h=9fb8ee6e7ca3765a23b23e173483c2de1ee0a0fc;hp=8c9919535dfd901cd67a81062ef7e9830debc836;hb=d19ee92905c9bf32fb53c9cc0841537c7b92901c;hpb=957d3f466cea2fa642f67f477ec4ad9a0d535a9b

diff --git a/ExampleDNSServer.hs b/ExampleDNSServer.hs
index 8c99195..9fb8ee6 100644
--- a/ExampleDNSServer.hs
+++ b/ExampleDNSServer.hs
@@ -11,6 +11,7 @@ main = runNamed cnf (return . findZone)
       cnf :: Config
       cnf = Config {
               cnfServerAddress = SockAddrInet 9090 iNADDR_ANY
+            , cnfAllowTransfer = True
             }
 
       findZone :: DomainName -> Maybe Zone
@@ -30,8 +31,7 @@ main = runNamed cnf (return . findZone)
                           , soaExpirationLimit    = 3600000
                           , soaMinimumTTL         = 3600
                           }
-             , zoneRecordNames = return [ mkDN "cielonegro.org."
-                                        , mkDN "ns.cielonegro.org."
+             , zoneRecordNames = return [ mkDN "ns.cielonegro.org."
                                         , mkDN "www.cielonegro.org."
                                         , mkDN "git.cielonegro.org."
                                         ]