From 71075999e9c7cbcb16220c47c750e859d3ccc7e2 Mon Sep 17 00:00:00 2001 From: Joe Crayne Date: Mon, 18 May 2020 16:48:40 -0400 Subject: Eq/Ord instances for Fingerprint + defaultFeatures packet. --- Data/OpenPGP/Util/Fingerprint.hs | 1 + 1 file changed, 1 insertion(+) (limited to 'Data/OpenPGP/Util/Fingerprint.hs') diff --git a/Data/OpenPGP/Util/Fingerprint.hs b/Data/OpenPGP/Util/Fingerprint.hs index 955748d..422beac 100644 --- a/Data/OpenPGP/Util/Fingerprint.hs +++ b/Data/OpenPGP/Util/Fingerprint.hs @@ -23,6 +23,7 @@ oo :: (b -> c) -> (a -> a1 -> b) -> a -> a1 -> c oo = (.) . (.) newtype Fingerprint = Fingerprint BS.ByteString + deriving (Eq,Ord) instance Show Fingerprint where show fp = hex fp -- cgit v1.2.3