zone.lisp: Change the `:sshfp' option tags to be keywords.
authorMark Wooding <mdw@distorted.org.uk>
Mon, 22 Dec 2014 20:41:48 +0000 (20:41 +0000)
committerMark Wooding <mdw@distorted.org.uk>
Mon, 22 Dec 2014 22:22:50 +0000 (22:22 +0000)
zone.lisp

index 3aa25ba..9ce8a34 100644 (file)
--- a/zone.lisp
+++ b/zone.lisp
       (rec :type :txt
           :data (nreverse things)))))
 
-(defenum sshfp-algorithm (rsa 1) (dsa 2) (ecdsa 3))
-(defenum sshfp-type (sha-1 1) (sha-256 2))
+(defenum sshfp-algorithm () (:rsa 1) (:dsa 2) (:ecdsa 3))
+(defenum sshfp-type () (:sha-1 1) (:sha-256 2))
 
 (export '*sshfp-pathname-defaults*)
 (defvar *sshfp-pathname-defaults*