From 0214686d1beaf10bd0b03b36105f59311111b3df Mon Sep 17 00:00:00 2001 From: joe Date: Mon, 5 Sep 2016 16:27:35 -0400 Subject: Oops, confused haddock. --- lib/Transforms.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib/Transforms.hs') diff --git a/lib/Transforms.hs b/lib/Transforms.hs index ba85b18..990a5b4 100644 --- a/lib/Transforms.hs +++ b/lib/Transforms.hs @@ -515,7 +515,7 @@ showPacket p | isKey p = (if is_subkey p ++ " "++show (key_algorithm p) ++ case key_nbits p of { 0 -> ""; n -> "("++show n++")" } | isUserID p = showPacket0 p ++ " " ++ show (uidkey p) - -- | isSignaturePacket p = showPacket0 p ++ maybe "" ((++) (" ^ signed"++sigusage p++": ")) (signature_issuer p) + -- isSignaturePacket p = showPacket0 p ++ maybe "" ((++) (" ^ signed"++sigusage p++": ")) (signature_issuer p) | isSignaturePacket p = showPacket0 p ++ maybe "" (" ^ signed: "++) (signature_issuer p) ++ sigusage p | otherwise = showPacket0 p where -- cgit v1.2.3