X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/38d4fd3b42b382d86be4b67fda8889894c89f087..d63aa5e7b08630cc17a606e85e35acc5bd0041ee:/src/plugins/bind.sml

diff --git a/src/plugins/bind.sml b/src/plugins/bind.sml
index 89e8b06..ca35c2c 100644
--- a/src/plugins/bind.sml
+++ b/src/plugins/bind.sml
@@ -229,7 +229,7 @@ val () = Slave.registerFileHandler (fn fs =>
 					   val {dir, file} = OS.Path.splitDirFile (#file fs)
 							     
 					   fun dnsChanged () =
-					       if #domain fs = !didDomain orelse Slave.hostname () <> Config.masterNode then
+					       if #domain fs = !didDomain orelse Slave.hostname () <> Config.Bind.masterNode then
 						   ()
 					       else if Slave.isDelete (#action fs) then
 						   let
@@ -257,7 +257,7 @@ val () = Slave.registerFileHandler (fn fs =>
 						       val min = readILine inf
 						       val () = TextIO.closeIn inf
 
-						       val serialPath = OS.Path.joinDirFile {dir = Config.serialDir,
+						       val serialPath = OS.Path.joinDirFile {dir = Config.Bind.serialDir,
 											     file = #domain fs}
 
 						       val oldSerial = let
@@ -375,11 +375,11 @@ val _ = Env.type_one "srv_domain"
 	validSrvDomain
 
 val _ = Env.registerFunction ("dns_master_node",
-			      fn [] => SOME (EString Config.masterNode, dl)
+			      fn [] => SOME (EString Config.Bind.masterNode, dl)
 			      | _ => NONE)
 
 val _ = Env.registerFunction ("dns_slave_nodes",
-			      fn [] => SOME (EList (map (fn n => (EString n, dl)) Config.slaveNodes), dl)
+			      fn [] => SOME (EList (map (fn n => (EString n, dl)) Config.Bind.slaveNodes), dl)
 			      | _ => NONE)
 
 end