distorted.lisp: Add `evo' as an official alias for evolution.

[zones] / hosts.lisp

diff --git a/hosts.lisp b/hosts.lisp
index e29c30bc1e08515628a82f1743dd4ded48e3f23c..78b4f22c1f1f19eb1f2bfa41df86b5a738b9566e 100644 (file)
--- a/hosts.lisp
+++ b/hosts.lisp
@@ -29,7 +29,7 @@ (defnet distorted.org.uk 172.29.198.0/23
     (wired 128
       (unsafe 32)
       (dhcp 32))
-    (virtual 32)
+    (vpn 32)
     (nil 16
       (its 4))
     (colo 16)
@@ -66,8 +66,9 @@ (defhost vampire.unsafe (unsafe 5))
 (defhost ibanez.unsafe (unsafe 14))
 
 ;; Safe network.
-(defhost tubescreamer.safe (safe 1))
-(defhost obsidian.safe (safe 2))
+(defhost radius.safe (safe 1))
+(defhost vampire.safe (safe 2))
+(defhost evolution.safe (safe 3))
 
 ;; Wireless network.
 (defhost radius.untrusted (untrusted 1))
@@ -75,8 +76,8 @@ (defhost evolution.untrusted (untrusted 2))
 (defhost vampire.untrusted (untrusted 3))
 
 ;; Virtual private network.
-(defhost crybaby.virtual (virtual 1))
-(defhost terror.virtual (virtual 2))
+(defhost crybaby.vpn (vpn 1))
+(defhost terror.vpn (vpn 2))
 
 ;; Iodine network.
 (defhost vampire.iodine (iodine 1))