From c32d96fac6d653c70d82990fdf17a0c885b65f7a Mon Sep 17 00:00:00 2001 Message-Id: From: Mark Wooding Date: Fri, 20 Mar 2015 20:34:00 +0000 Subject: [PATCH] distorted.lisp, hosts.lisp: Assign theme names to the TP-Link switches. Organization: Straylight/Edgeware From: Mark Wooding Thanks to Owen Dunn for pointing me at some excellent names. --- distorted.lisp | 9 ++++++--- hosts.lisp | 6 +++--- 2 files changed, 9 insertions(+), 6 deletions(-) diff --git a/distorted.lisp b/distorted.lisp index 43fcca2..90f9014 100644 --- a/distorted.lisp +++ b/distorted.lisp @@ -229,9 +229,12 @@ (defzone distorted.org.uk (evolution :alias evo) ;; Switches. - (tp0 (safe :addr tp0.safe)) - (tp1 (safe :addr tp1.safe)) - (tp2 (safe :addr tp2.safe)) + (grigsby :alias tp0) + (grigsby (safe :addr grigsby.safe)) + (carling :alias tp1) + (carling (safe :addr carling.safe)) + (tritan :alias tp2) + (tritan (safe :addr tritan.safe)) ;; Wired ethernet. (unsafe :net unsafe) diff --git a/hosts.lisp b/hosts.lisp index e4d7111..7463af1 100644 --- a/hosts.lisp +++ b/hosts.lisp @@ -98,9 +98,9 @@ (defhost marauder.safe ((:ipv6 "2001:470:9740:4001:a00:27ff:fe6a:7846"))) (defhost radius.safe (safe 1)) (defhost vampire.safe (safe 2)) (defhost evolution.safe (safe 3)) -(defhost tp0.safe (safe 4)) -(defhost tp1.safe (safe 5)) -(defhost tp2.safe (safe 6)) +(defhost grigsby.safe (safe 4)) +(defhost carling.safe (safe 5)) +(defhost tritan.safe (safe 6)) ;; Wireless network. (defhost radius.untrusted (untrusted 1)) -- [mdw]