zone.lisp: Include SSHFP type code for Ed25519 keys.

[zone] / zone.lisp

diff --git a/zone.lisp b/zone.lisp
index bd3cd3f..8eef825 100644 (file)
--- a/zone.lisp
+++ b/zone.lisp
@@ -923,7 +923,7 @@
       (rec :type :txt
           :data (nreverse things)))))
 
-(defenum sshfp-algorithm () (:rsa 1) (:dsa 2) (:ecdsa 3))
+(defenum sshfp-algorithm () (:rsa 1) (:dsa 2) (:ecdsa 3) (:ed25519 4))
 (defenum sshfp-type () (:sha-1 1) (:sha-256 2))
 
 (export '*sshfp-pathname-defaults*)