hosts.lisp: Fix Mythic's ns1 address.

[zones] / hosts.lisp

diff --git a/hosts.lisp b/hosts.lisp
index 2c1719e5055c6b6903787d3fdcf7546c640ead30..8e308b1e4d5966a864f61d9cb13d16298330f1f3 100644 (file)
--- a/hosts.lisp
+++ b/hosts.lisp
@@ -10,7 +10,7 @@ (defhost chiark.greenend.org.uk ((:ipv4 "212.13.197.229")
                                 #+chiark-dns-ipv6 (:ipv6 "2001:ba8:1e3::")))
 (defhost mccoy.flatline.org.uk "80.74.241.31")
 (defhost mythic-ns1 ((:ipv4 "45.33.127.156")
-                    (:ipv6 "2600:3c00::f03c:91ff:fe96:beac")))
+                    (:ipv6 "2600:3c00:e000:19::1")))
 (defhost mythic-ns2 ((:ipv4 "93.93.128.67")
                     (:ipv6 "2a00:1098:0:80:1000::10")))
 (defhost mythic-ns3 ((:ipv4 "185.24.221.32")
@@ -136,6 +136,7 @@ (defhost spirit.vpn ((:ipv4 vpn 9) (:ipv6 vpn "::9:1")))
 
 ;; Untrusted private network.
 (defhost national.upn ((:ipv4 upn 1) (:ipv6 upn "::1:1")))
+(defhost mdwdev.upn ((:ipv4 upn 2) (:ipv6 upn "::2:1")))
 
 ;; Iodine network.
 (defhost jazz.iodine (iodine 1))
@@ -186,5 +187,6 @@    (defhost stratocaster stratocaster.jump)
    (defhost national national.linode)))
 
 (defhost marshall marshall.jump)
+(defhost mdwdev mdwdev.upn)
 
 ;;;----- That's all, folks --------------------------------------------------