hosts.lisp, distorted.lisp: Add static address for scanner.

diff --git a/distorted.lisp b/distorted.lisp
index 190c54e1f5e25e2d3cbbe2c9899b430587262cc1..9516a01ad50a00b6b3b0b9ee6c9f611fa23ffb0e 100644 (file)
--- a/distorted.lisp
+++ b/distorted.lisp
@@ -235,9 +235,11 @@ (defzone distorted.org.uk
   (lunch :alias ap1)
   (lunch (safe :addr lunch.safe))
 
-  ;; Printer.
+  ;; Printer and scanner.
   (burntaxe :alias lp0)
   (burntaxe (safe :addr burntaxe.safe))
+  (unicorn :alias scan0)
+  (unicorn (safe :addr unicorn.safe))
 
   ;; Switches.
   (grigsby :alias tp0)

diff --git a/hosts.lisp b/hosts.lisp
index 8add49a2141ee3dcc05c3b4bae7e85a03f16b3b5..107e2d62d1b92ecf8d0c94bf1a8d7ea72c0e4330 100644 (file)
--- a/hosts.lisp
+++ b/hosts.lisp
@@ -120,6 +120,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))
 
 ;; Wireless network.
 (defhost radius.untrusted (untrusted 1))