summaryrefslogtreecommitdiff
path: root/Remote/Web.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2015-08-17 11:35:34 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2015-08-17 11:35:34 -0400
commitcdbf4d2873b0655c06b0de0d6c4e73e499101692 (patch)
treefe7c2ad4072b2a60f5f9b94227c1b361aee4df53 /Remote/Web.hs
parentefaffb47e901357fc8ffeb224d240c1f9238fbeb (diff)
make whereis show urls when web remote does not have content
This is needed when external special remotes register an url for a key.
Diffstat (limited to 'Remote/Web.hs')
-rw-r--r--Remote/Web.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Remote/Web.hs b/Remote/Web.hs
index 357522836..700f40480 100644
--- a/Remote/Web.hs
+++ b/Remote/Web.hs
@@ -7,7 +7,7 @@
{-# LANGUAGE CPP #-}
-module Remote.Web (remote) where
+module Remote.Web (remote, getWebUrls) where
import Common.Annex
import Types.Remote
@@ -54,7 +54,7 @@ gen r _ c gc =
, removeKey = dropKey
, checkPresent = checkKey
, checkPresentCheap = False
- , whereisKey = Just getWebUrls
+ , whereisKey = Nothing
, remoteFsck = Nothing
, repairRepo = Nothing
, config = c