typo
This commit is contained in:
parent
77938a7d62
commit
0cb4382880
1 changed files with 1 additions and 1 deletions
|
@ -25,7 +25,7 @@ seek = [withKeys start]
|
|||
start :: Key -> CommandStart
|
||||
start key = ifM (inAnnex key)
|
||||
( error "key is already present in annex"
|
||||
, fieldTransfer Download key $ _p -> do
|
||||
, fieldTransfer Download key $ \_p -> do
|
||||
ifM (getViaTmp key $ liftIO . rsyncServerReceive)
|
||||
( do
|
||||
-- forcibly quit after receiving one key,
|
||||
|
|
Loading…
Reference in a new issue