Annotate defaults

diff --git a/lib/defaults.dtl b/lib/defaults.dtl
index a9d7a99..d6bf689 100644 (file)
--- a/lib/defaults.dtl
+++ b/lib/defaults.dtl
@@ -17,26 +17,26 @@ var ServerAdmin : email = defaultServerAdmin;
 
 var Aliases : [your_domain] = [];
 
 
 var Aliases : [your_domain] = [];
 

-val defaultTTL = 3600;
+val defaultTTL : int = 3600;

 val defaultNs : domain = "ns1.hcoop.net";
 val defaultNs : domain = "ns1.hcoop.net";

-val defaultRefresh = 86400;
-val defaultRetry = 1800;
-val defaultExpiry = 1209600;
-val defaultMinimum = 3600;
+val defaultRefresh : int = 86400;
+val defaultRetry : int = 1800;
+val defaultExpiry : int = 1209600;
+val defaultMinimum : int = 3600;

 
 

-val dnsMasterNode = (internalMaster dns_master_node);
+val dnsMasterNode : master = (internalMaster dns_master_node);

 val dnsSlaveNodes : [dns_node] = dns_slave_nodes;
 
 var DNS : dnsKind =  useDns (soa defaultNs serialAuto defaultRefresh defaultRetry defaultExpiry defaultMinimum) dnsMasterNode dnsSlaveNodes;
 val dnsSlaveNodes : [dns_node] = dns_slave_nodes;
 
 var DNS : dnsKind =  useDns (soa defaultNs serialAuto defaultRefresh defaultRetry defaultExpiry defaultMinimum) dnsMasterNode dnsSlaveNodes;

-var TTL = defaultTTL;
+var TTL : int = defaultTTL;

 
 var WWW : [Vhost] = Skip;
 
 var WWW : [Vhost] = Skip;

-var CreateWWW = true;
-var DefaultA = true;
-var DefaultAlias = true;
-var DefaultAliasSource = defaultSource;
-var HandleMail = true;
-var AddMX = true;
+var CreateWWW : bool = true;
+var DefaultA : bool = true;
+var DefaultAlias : bool = true;
+var DefaultAliasSource : aliasSource = defaultSource;
+var HandleMail : bool = true;
+var AddMX : bool = true;

 
 var MailNodes : [mail_node] = ["deleuze"];
 
 
 var MailNodes : [mail_node] = ["deleuze"];