Bad record name

2020-11-17 15:06:37 -08:00 · 2020-11-17 15:06:37 -08:00 · 8f1de937f5
parent ae146d3a26
commit 8f1de937f5
1 changed files with 1 additions and 1 deletions
--- 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"))))