distorted.lisp: Publish a TLSA record for `rawk'.

[zones] / distorted.lisp

diff --git a/distorted.lisp b/distorted.lisp
index a2b9a4f31601a007d179aa8af42ff775df217cd3..88c9bd271111eb27a9fd457326b368df4c721e80 100644 (file)
--- a/distorted.lisp
+++ b/distorted.lisp
@@ -168,7 +168,10 @@ (defzone distorted.org.uk
   (cabal :svc stratocaster.colo :sshfp "stratocaster")
 
   ;; Local services.
-  ((rawk pifi) (unsafe :svc artist.unsafe) (dmz :svc artist.dmz))
+  (rawk (unsafe :svc artist.unsafe) (dmz :svc artist.dmz))
+  (rawk :tlsa (:https (:service-certificate-constraint
+                      :public-key :sha-256
+                      #p"https-artist")))
   (mirror (dmz :svc roadstar.dmz :sshfp "roadstar")
          (unsafe :svc roadstar.unsafe :sshfp "roadstar"))