make --json-progress work for url downloads
This commit is contained in:
parent
312ef4dfae
commit
d4fbc3b460
2 changed files with 16 additions and 12 deletions
|
@ -902,7 +902,7 @@ saveState nocommit = doSideAction $ do
|
|||
|
||||
{- Downloads content from any of a list of urls. -}
|
||||
downloadUrl :: Key -> MeterUpdate -> [Url.URLString] -> FilePath -> Annex Bool
|
||||
downloadUrl k p urls file = concurrentMeteredFile file (Just p) k $
|
||||
downloadUrl k p urls file = meteredFile file (Just p) k $
|
||||
go =<< annexWebDownloadCommand <$> Annex.getGitConfig
|
||||
where
|
||||
go Nothing = do
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue