X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/zones/blobdiff_plain/1ec6ca016e1a99ed62a6fbd9148cd6abe6387872..4a487d58d01e828cc7483134fb31aa20d9ab675f:/harlequin.lisp

diff --git a/harlequin.lisp b/harlequin.lisp
index c7f9682..e1bdb18 100644
--- a/harlequin.lisp
+++ b/harlequin.lisp
@@ -6,9 +6,9 @@ (setf *default-zone-admin* "hostmaster@distorted.org.uk")
 
 (setf *default-zone-source* 'vampire.distorted.org.uk.)
 (preferred-subnet-case
-  (fretwank
-   (defhost mail vampire.fretwank)
-   (defhost bloghost vampire.fretwank))
+  (internal
+   (defhost mail vampire)
+   (defhost bloghost vampire))
   (t
    (defhost mail vampire.demon)
    (defhost bloghost vampire.demon)))
@@ -16,11 +16,11 @@    (defhost bloghost vampire.demon)))
 (defzone harlequin.org.uk
   ;;
   ;; Nameservers
-  :ns #+view/fretwank ((vampire.ns :ip vampire))
-      #-view/fretwank ((mythic-beasts-1.ns :ip mythic-ns1)
-		       (mythic-beasts-2.ns :ip mythic-ns2)
-		       (radius.ns :ip radius.demon)
-		       (vampire.ns :ip vampire.demon))
+  :ns #+view/inside ((vampire.ns :ip vampire))
+      #-view/inside ((mythic-beasts-1.ns :ip mythic-ns1)
+		     (mythic-beasts-2.ns :ip mythic-ns2)
+		     (radius.ns :ip radius.demon)
+		     (vampire.ns :ip vampire.demon))
   ;;
   ;; Mail servers
   :mx ((mail :ip mail))