X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/zones/blobdiff_plain/ca8149e1a9dc5c69f23c0a54310094104f3f4042..HEAD:/hosts.lisp

diff --git a/hosts.lisp b/hosts.lisp
index 182989c..b77cd67 100644
--- a/hosts.lisp
+++ b/hosts.lisp
@@ -62,7 +62,7 @@ (defnet jump-ipv6 "2001:ba8:1d9/48")
 ;;; Host allocations
 
 ;; External addresses.
-(defhost guvnor.dmz ((:ipv4 gw 0) (:ipv6 dmz "::1:1")))
+(defhost guvnor.dmz (gw 0))
 (defhost radius.dmz (dmz 1))
 (defhost roadstar.dmz (dmz 2))
 (defhost jem.dmz (dmz 3))
@@ -115,6 +115,7 @@ (defhost gretsch.unsafe ((:ipv6 unsafe "3a2c:4aff:fe6d:e768")))
 (defhost spirit.unsafe ((:ipv6 unsafe "568d:5aff:fed9:18b8")))
 (defhost invader.safe ((:ipv6 safe "a00:27ff:fe94:a5d7")))
 (defhost marauder.safe ((:ipv6 safe "a00:27ff:fe6a:7846")))
+(defhost unicorn.safe ((:ipv6 safe "20e:c6ff:fe90:a926")))
 
 ;; Safe network.
 (defhost radius.safe (safe 1))
@@ -126,7 +127,7 @@ (defhost tritan.safe (safe 6))
 (defhost kitkat.safe (safe 7))
 (defhost lunch.safe (safe 8))
 (defhost burntaxe.safe (safe 9))
-(defhost unicorn.safe (safe 10))
+(defhost unicorn.safe ((:ipv4 safe 10)))
 
 ;; Wireless network.
 (defhost radius.untrusted (untrusted 1))
@@ -194,7 +195,4 @@    (defhost stratocaster stratocaster.dmz)
    (defhost national national.linode)
    (defhost eggle eggle.jump)))
 
-(defhost marshall marshall.dmz)
-(defhost mdwdev mdwdev.upn)
-
 ;;;----- That's all, folks --------------------------------------------------