From 036cfc597f9ba8524aa30d7b53ca0608c563483f Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adamc@hcoop.net>
Date: Thu, 20 Dec 2007 13:37:33 +0000
Subject: [PATCH] Temporary DNS-out-of-sync fix that reloads BIND too often

---
 src/domain.sml | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/domain.sml b/src/domain.sml
index 8384f85..d7b4052 100644
--- a/src/domain.sml
+++ b/src/domain.sml
@@ -645,7 +645,10 @@ val _ = Env.containerV_one "domain"
 								write "\t};\n")
 						 | _ => (write "\tmasters { ";
 							 write masterIp;
-							 write "; };\n");
+							 write "; };\n";
+							 write "// Updated: ";
+							 write (Time.toString (Time.now ()));
+							 write "\n");
 					       write "};\n";
 					       close ()
 					   end
-- 
2.20.1