~mdw
/
zones
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
distorted.lisp: Service name `pifi' for lounge jukebox
[zones]
/
harlequin.lisp
diff --git
a/harlequin.lisp
b/harlequin.lisp
index
08e8f30
..
15deeb7
100644
(file)
--- a/
harlequin.lisp
+++ b/
harlequin.lisp
@@
-1,19
+1,26
@@
;;; Zone file for harlequin.org.uk
;;; Zone file for harlequin.org.uk
-(load "hosts" :verbose nil)
+(load "hosts
.lisp
" :verbose nil)
(setf *default-zone-admin* "hostmaster@distorted.org.uk")
(setf *default-zone-admin* "hostmaster@distorted.org.uk")
-(setf *default-zone-source* 'guvnor.distorted.org.uk.)
+
+(setf *default-zone-source* 'radius.distorted.org.uk.)
(defzone harlequin.org.uk
(defzone harlequin.org.uk
- ;;
+
;; Nameservers
;; Nameservers
- :ns ((boyle.ns :ip boyle.nsict.org)
- ns0.blackcatnetworks.co.uk.
- ns1.blackcatnetworks.co.uk.)
- ;;
+ :ns ((radius.ns :ip radius)
+ (precision.ns :ip precision)
+ (mythic-beasts-1.ns :ip mythic-ns1)
+ (mythic-beasts-2.ns :ip mythic-ns2))
+
;; Mail servers
;; Mail servers
- :mx ((mail :ip guvnor.demon))
- ;;
+ :mx ((mail :ip vampire))
+ :srv ((:smtp mail))
+
;; Web service
;; Web service
- ((@ www) :a boyle.nsict.org))
+ ((@ www) :svc boyle.nsict.org)
+ :srv ((:http www))
+
+ ;; Web log (currently local)
+ (bindery :svc vampire))