Ah shit I was retrieving a list

This commit is contained in:
Niten 2020-12-04 10:00:58 -08:00
parent 99a1abe88b
commit 3075453a8c
1 changed files with 1 additions and 1 deletions

View File

@ -61,7 +61,7 @@
:reader error-msg)))
(defun get-domain (domain)
(if-let ((domain (select-dao 'dns-domain (:= 'name domain))))
(if-let ((domain (car (select-dao 'dns-domain (:= 'name domain)))))
domain
(error 'domain-name-missing :domain domain)))