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

@ -19,7 +19,7 @@ cmd = noCommit $ noMessages $
run :: () -> String -> Annex Bool
run _ p = do
let k = fromMaybe (giveup "bad key") $ file2key p
let k = fromMaybe (giveup "bad key") $ deserializeKey p
maybe (return False) (\f -> liftIO (putStrLn f) >> return True)
=<< inAnnex' (pure True) Nothing check k
where