From 8f1de937f5321f640597b520dca926931698922b Mon Sep 17 00:00:00 2001 From: Niten Date: Tue, 17 Nov 2020 15:06:37 -0800 Subject: [PATCH] Bad record name --- backplane-dns.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/backplane-dns.lisp b/backplane-dns.lisp index 6e3dd12..6ba8d65 100644 --- a/backplane-dns.lisp +++ b/backplane-dns.lisp @@ -189,7 +189,7 @@ (id)))) (let* ((new-sshfps (mapcar #'validate-sshfp incoming-sshfps)) (full-hostname (format nil "~A.~A" host domain)) - (sshfp-records (select-dao 'record + (sshfp-records (select-dao 'dns-record (:and (:= 'name full-hostname) (:= 'domain-id domain-id) (:= 'type "SSHFP"))))