harlequin.lisp: Use the statically defined address for `guvnor'.

This avoids exercising the resolver for what's anyway a locally defined
name, and also avoids stressing the local search rules.

diff --git a/harlequin.lisp b/harlequin.lisp
index 148d696..ecb2a67 100644 (file)
--- a/harlequin.lisp
+++ b/harlequin.lisp
@@ -11,8 +11,8 @@
    (defhost bloghost vampire))
   (t
    (setf *default-zone-source* 'guvnor.distorted.org.uk.)
-   (defhost mail guvnor.demon)
-   (defhost bloghost guvnor.demon)))
+   (defhost mail guvnor.distorted.org.uk)
+   (defhost bloghost guvnor.distorted.org.uk)))
 
 (defzone harlequin.org.uk
   ;;