diff options
| -rw-r--r-- | Remote/WebDAV.hs | 5 | ||||
| -rw-r--r-- | debian/changelog | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/Remote/WebDAV.hs b/Remote/WebDAV.hs index 35af290ad..87df16e93 100644 --- a/Remote/WebDAV.hs +++ b/Remote/WebDAV.hs @@ -260,7 +260,10 @@ existsDAV :: DavLocation -> DAVT IO (Either String Bool) existsDAV l = inLocation l check `catchNonAsync` (\e -> return (Left $ show e)) where check = do - setDepth Nothing + -- Some DAV services only support depth of 1, and + -- more depth is certainly not needed to check if a + -- location exists. + setDepth (Just Depth1) catchJust (matchStatusCodeException (== notFound404)) (getPropsM >> ispresent True) diff --git a/debian/changelog b/debian/changelog index c6eb05287..6340888cd 100644 --- a/debian/changelog +++ b/debian/changelog @@ -22,6 +22,8 @@ git-annex (6.20160127) UNRELEASED; urgency=medium * init: Fix bugs in submodule .git symlink fixup, that occurred when initializing in a subdirectory of a submodule and a submodule of a submodule. + * WebDAV: Set depth 1 in PROPFIND request, for better compatability with + some servers. Thanks, wzhd. -- Joey Hess <id@joeyh.name> Thu, 28 Jan 2016 13:53:09 -0400 |