From d6e03020851601668cf5419950ca0cc49e54c42f Mon Sep 17 00:00:00 2001 From: Joe Crayne Date: Mon, 15 Jul 2019 18:49:22 -0400 Subject: Switched fingerprint to a wrapped ByteString. --- Data/OpenPGP/Util/Base.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Data/OpenPGP/Util/Base.hs') diff --git a/Data/OpenPGP/Util/Base.hs b/Data/OpenPGP/Util/Base.hs index c1088d8..5b3e159 100644 --- a/Data/OpenPGP/Util/Base.hs +++ b/Data/OpenPGP/Util/Base.hs @@ -82,7 +82,7 @@ toLazyBS :: BS.ByteString -> LZ.ByteString toLazyBS = LZ.fromChunks . (:[]) find_key :: OpenPGP.Message -> String -> Maybe OpenPGP.Packet -find_key = OpenPGP.find_key fingerprint +find_key = OpenPGP.find_key (show . fingerprint) -- cgit v1.2.3