chiark
/
gitweb
/
~mdw
/
zones
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
0262908
)
distorted.lisp: Announce internal addresses for colocated servers.
author
Mark Wooding
<mdw@distorted.org.uk>
Wed, 25 Apr 2012 21:41:57 +0000
(22:41 +0100)
committer
Mark Wooding
<mdw@distorted.org.uk>
Wed, 25 Apr 2012 21:41:57 +0000
(22:41 +0100)
distorted.lisp
patch
|
blob
|
blame
|
history
diff --git
a/distorted.lisp
b/distorted.lisp
index d9691dabebcb12878500e6ae814d41be9f8fe874..4c3b8342cf77c2b6d1d4d580e87612d670cc05a8 100644
(file)
--- a/
distorted.lisp
+++ b/
distorted.lisp
@@
-85,17
+85,17
@@
(defzone distorted.org.uk
;; Colocated hosts.
(colo :net colo)
(jump :net jump)
;; Colocated hosts.
(colo :net colo)
(jump :net jump)
- (fender
;
(colo :a fender.colo)
+ (fender (colo :a fender.colo)
(jump :a fender.jump))
(jump :a fender.jump))
- (precision
;
(colo :a precision.colo)
+ (precision (colo :a precision.colo)
(jump :a precision.jump))
(jump :a precision.jump))
- (telecaster
;
(colo :a telecaster.colo)
+ (telecaster (colo :a telecaster.colo)
(jump :a telecaster.jump))
(telecaster :alias tele)
(jump :a telecaster.jump))
(telecaster :alias tele)
- (stratocaster
;
(colo :a stratocaster.colo)
+ (stratocaster (colo :a stratocaster.colo)
(jump :a stratocaster.jump))
(stratocaster :alias strat)
(jump :a stratocaster.jump))
(stratocaster :alias strat)
- (jazz
;
(colo :a jazz.colo)
+ (jazz (colo :a jazz.colo)
(jump :a jazz.jump))
;; Wired ethernet.
(jump :a jazz.jump))
;; Wired ethernet.