From: Mark Wooding <mdw@distorted.org.uk>
Date: Mon, 19 Mar 2012 13:59:51 +0000 (+0000)
Subject: distorted.lisp: Fix subnets for anycast service names.
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/zones/commitdiff_plain/e40773afbcdabe46a3ab4aaf58e4ab2576cec561

distorted.lisp: Fix subnets for anycast service names.
---

diff --git a/distorted.lisp b/distorted.lisp
index a39ac91..85c9338 100644
--- a/distorted.lisp
+++ b/distorted.lisp
@@ -36,16 +36,16 @@ (defzone distorted.org.uk
 	((:kpasswd :protocol :udp) krb))
 
   ;; Anycast services.  (Currently not implemented.)
-  (dns0 (inside :svc radius.unsafe)
+  (dns0 (unsafe :svc radius.unsafe)
 	(any :a dns0.any))
-  (dns1 (inside :svc vampire.unsafe)
+  (dns1 (unsafe :svc vampire.unsafe)
 	(any :a dns1.any))
-  (ntp0 (inside :svc ibanez.unsafe)
+  (ntp0 (unsafe :svc ibanez.unsafe)
 	(any :a ntp0.any))
-  (ntp1 (inside :svc vampire.unsafe)
+  (ntp1 (unsafe :svc vampire.unsafe)
 	(any :a ntp1.any))
   (www-cache (dmz :svc vampire.dmz)
-	     (inside :svc vampire.unsafe)
+	     (unsafe :svc vampire.unsafe)
 	     (any :a www-cache.any))
   (dns :cname dns0)
   (ntp :cname ntp0)