summaryrefslogtreecommitdiff
path: root/Command/RegisterUrl.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/RegisterUrl.hs')
-rw-r--r--Command/RegisterUrl.hs5
1 files changed, 1 insertions, 4 deletions
diff --git a/Command/RegisterUrl.hs b/Command/RegisterUrl.hs
index c1f5a2fcd..8e86bcaa2 100644
--- a/Command/RegisterUrl.hs
+++ b/Command/RegisterUrl.hs
@@ -55,8 +55,5 @@ perform key url = do
perform' :: Key -> URLString -> Annex Bool
perform' key url = do
r <- Remote.claimingUrl url
- let url' = if Remote.uuid r == webUUID
- then url
- else setDownloader url OtherDownloader
- setUrlPresent (Remote.uuid r) key url'
+ setUrlPresent (Remote.uuid r) key (setDownloader' url r)
return True