rest of the deserializeKey renameing

This commit is contained in:
Joey Hess 2019-01-14 13:17:47 -04:00
parent 1791447cc8
commit 303e828b7c
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
15 changed files with 19 additions and 19 deletions

View file

@ -26,7 +26,7 @@ start (keyname:file:[]) = do
start _ = giveup "specify a key and a content file"
mkKey :: String -> Key
mkKey = fromMaybe (giveup "bad key") . file2key
mkKey = fromMaybe (giveup "bad key") . deserializeKey
perform :: FilePath -> Key -> CommandPerform
perform file key = do