1 files changed, 1 insertions, 1 deletions

diff --git a/lib/OpenPGP.Crypto.hs b/lib/OpenPGP.Crypto.hs
index 3e23815..5d1475f 100644
--- a/lib/OpenPGP.Crypto.hs
+++ b/lib/OpenPGP.Crypto.hs
@@ -20,7 +20,7 @@ fingerprint :: OpenPGP.Packet -> String
 fingerprint p | OpenPGP.version p == 4 =
         BaseConvert.toString 16 $ SHA1.toInteger $ SHA1.hash $
                 LZ.unpack (LZ.concat (OpenPGP.fingerprint_material p))
-fingerprint p | OpenPGP.version p == 2 || OpenPGP.version p == 3 =
+fingerprint p | (OpenPGP.version p) `elem` [2, 3] =
         concat $ map (BaseConvert.toString 16) $
                 MD5.hash $ LZ.unpack (LZ.concat (OpenPGP.fingerprint_material p))