type alias cleanup
This commit is contained in:
parent
a2ec2d3760
commit
4a02c2ea62
38 changed files with 129 additions and 122 deletions
|
@ -21,7 +21,7 @@ def = [dontCheck fromOpt $ command "get" paramPaths seek
|
|||
seek :: [CommandSeek]
|
||||
seek = [withNumCopies $ \n -> whenAnnexed $ start n]
|
||||
|
||||
start :: Maybe Int -> FilePath -> (Key, Backend Annex) -> CommandStart
|
||||
start :: Maybe Int -> FilePath -> (Key, Backend) -> CommandStart
|
||||
start numcopies file (key, _) = stopUnless (not <$> inAnnex key) $
|
||||
autoCopies key (<) numcopies $ do
|
||||
from <- Annex.getState Annex.fromremote
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue