summaryrefslogtreecommitdiff
path: root/Command
diff options
context:
space:
mode:
authorJoey Hess <joeyh@joeyh.name>2017-12-11 13:41:41 -0400
committerJoey Hess <joeyh@joeyh.name>2017-12-11 13:41:41 -0400
commitbd7f8be121a5cd310ffbc32c6020326ef437a151 (patch)
tree564146c978109bcc7f142c808dcfec712c0a0f58 /Command
parente429fa597bcf4729d6f577de2403021fe4603269 (diff)
fix recorded url when using --file with external special remote
The youtube changes accidentially caused the OtherDownloader url to not get used here, which broke datalad's test suite luckily. This commit was supported by the NSF-funded DataLad project.
Diffstat (limited to 'Command')
-rw-r--r--Command/AddUrl.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Command/AddUrl.hs b/Command/AddUrl.hs
index b5ec929a40..406682e732 100644
--- a/Command/AddUrl.hs
+++ b/Command/AddUrl.hs
@@ -158,8 +158,8 @@ performRemote r o uri file sz = ifAnnexed file adduri geturi
loguri = setDownloader uri OtherDownloader
adduri = addUrlChecked o loguri file (Remote.uuid r) checkexistssize
checkexistssize key = return $ case sz of
- Nothing -> (True, True, uri)
- Just n -> (True, n == fromMaybe n (keySize key), uri)
+ Nothing -> (True, True, loguri)
+ Just n -> (True, n == fromMaybe n (keySize key), loguri)
geturi = next $ isJust <$> downloadRemoteFile r (downloadOptions o) uri file sz
downloadRemoteFile :: Remote -> DownloadOptions -> URLString -> FilePath -> Maybe Integer -> Annex (Maybe Key)