summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorjoe <joe@jerkface.net>2016-09-05 16:27:35 -0400
committerjoe <joe@jerkface.net>2016-09-05 16:27:35 -0400
commit0214686d1beaf10bd0b03b36105f59311111b3df (patch)
tree803a37bb1c91ab090119d52ac19ab8f14a6bb83b
parentdef3d7ad467fc86e2249e67054f66248e1cae07a (diff)
Oops, confused haddock.
-rw-r--r--lib/Transforms.hs2
1 files changed, 1 insertions, 1 deletions
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
515 ++ " "++show (key_algorithm p) 515 ++ " "++show (key_algorithm p)
516 ++ case key_nbits p of { 0 -> ""; n -> "("++show n++")" } 516 ++ case key_nbits p of { 0 -> ""; n -> "("++show n++")" }
517 | isUserID p = showPacket0 p ++ " " ++ show (uidkey p) 517 | isUserID p = showPacket0 p ++ " " ++ show (uidkey p)
518 -- | isSignaturePacket p = showPacket0 p ++ maybe "" ((++) (" ^ signed"++sigusage p++": ")) (signature_issuer p) 518 -- isSignaturePacket p = showPacket0 p ++ maybe "" ((++) (" ^ signed"++sigusage p++": ")) (signature_issuer p)
519 | isSignaturePacket p = showPacket0 p ++ maybe "" (" ^ signed: "++) (signature_issuer p) ++ sigusage p 519 | isSignaturePacket p = showPacket0 p ++ maybe "" (" ^ signed: "++) (signature_issuer p) ++ sigusage p
520 | otherwise = showPacket0 p 520 | otherwise = showPacket0 p
521 where 521 where