distorted.lisp, hosts.lisp: Sort `vampire' in with the other house servers.

[zones] / hosts.lisp

diff --git a/hosts.lisp b/hosts.lisp
index a969fe8..34c3a88 100644 (file)
--- a/hosts.lisp
+++ b/hosts.lisp
@@ -158,16 +158,16 @@
 (preferred-subnet-case
   ((unsafe colo)
    (defhost radius radius.unsafe)
+   (defhost vampire vampire.unsafe)
    (defhost precision precision.colo)
    (defhost telecaster telecaster.colo)
-   (defhost stratocaster stratocaster.colo)
-   (defhost vampire vampire.unsafe))
+   (defhost stratocaster stratocaster.colo))
   (t
    (defhost radius radius.dmz)
+   (defhost vampire vampire.dmz)
    (defhost precision precision.jump)
    (defhost telecaster telecaster.jump)
-   (defhost stratocaster stratocaster.jump)
-   (defhost vampire vampire.dmz)))
+   (defhost stratocaster stratocaster.jump)))
 
 (defhost jaguar jaguar.jump)