improve layout

This commit is contained in:
Joey Hess 2017-03-01 12:46:01 -04:00
parent ea1f812ebf
commit 5383340691
No known key found for this signature in database
GPG key ID: C910D9222512E3C7

View file

@ -89,7 +89,7 @@ formatKeyVariety v = case v of
addsz (HashSize n) s = s ++ show n
parseKeyVariety :: String -> KeyVariety
parseKeyVariety "SHA256" = SHA2Key (HashSize 256) (HasExt False)
parseKeyVariety "SHA256" = SHA2Key (HashSize 256) (HasExt False)
parseKeyVariety "SHA256E" = SHA2Key (HashSize 256) (HasExt True)
parseKeyVariety "SHA512" = SHA2Key (HashSize 512) (HasExt False)
parseKeyVariety "SHA512E" = SHA2Key (HashSize 512) (HasExt True)