(setf *default-zone-admin* "hostmaster@distorted.org.uk")
-(setf *default-zone-source* 'vampire.distorted.org.uk.)
-(preferred-subnet-case
- (fretwank
- (defhost mail vampire.fretwank)
- (defhost bloghost vampire.fretwank))
- (t
- (defhost mail vampire.demon)
- (defhost bloghost vampire.demon)))
+(setf *default-zone-source* 'radius.distorted.org.uk.)
(defzone harlequin.org.uk
- ;;
+
;; Nameservers
- :ns #+view/fretwank ((vampire.ns :ip vampire))
- #-view/fretwank ((mythic-beasts-1.ns :ip mythic-ns1)
- (mythic-beasts-2.ns :ip mythic-ns2)
- (radius.ns :ip radius.demon)
- (vampire.ns :ip vampire.demon))
- ;;
+ :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
- :mx ((mail :ip mail))
+ :mx ((mail :ip vampire))
:srv ((:smtp mail))
- ;;
+
;; Web service
((@ www) :svc boyle.nsict.org)
:srv ((:http www))
- ;;
+
;; Web log (currently local)
- (bindery :svc bloghost))
+ (bindery :svc vampire))