From c0d02a951278c483c9a9d946895db19fb73b2985 Mon Sep 17 00:00:00 2001
Message-Id: <c0d02a951278c483c9a9d946895db19fb73b2985.1714058589.git.mdw@distorted.org.uk>
From: Mark Wooding <mdw@chiark.greenend.org.uk>
Date: Sat, 8 Jul 2017 14:59:13 +0100
Subject: [PATCH] zone.lisp: Include SSHFP type code for Ed25519 keys.
Organization: Straylight/Edgeware

From: Mark Wooding <mdw@distorted.org.uk>

---
 zone.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/zone.lisp b/zone.lisp
index bd3cd3f..8eef825 100644
--- a/zone.lisp
+++ b/zone.lisp
@@ -923,7 +923,7 @@ (defzoneparse :dkim (name data rec)
       (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*)
-- 
[mdw]