rest of the deserializeKey renameing
This commit is contained in:
parent
1791447cc8
commit
303e828b7c
15 changed files with 19 additions and 19 deletions
|
@ -69,7 +69,7 @@ batchResult Present = liftIO $ putStrLn "1"
|
|||
batchResult _ = liftIO $ putStrLn "0"
|
||||
|
||||
toKey :: String -> Key
|
||||
toKey = fromMaybe (giveup "Bad key") . file2key
|
||||
toKey = fromMaybe (giveup "Bad key") . deserializeKey
|
||||
|
||||
toRemote :: String -> Annex Remote
|
||||
toRemote rn = maybe (giveup "Unknown remote") return
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue