diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2015-12-11 12:13:20 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-12-11 12:13:20 -0400 |
| commit | 307b40f19591b53830d7d7614bc4be8ff41f1327 (patch) | |
| tree | 7e59eb273db0613b803a4be3e09c9818ed95887f /Remote/WebDAV.hs | |
| parent | 18d6d9b85442f2a2810c8fa6b938be6bffa624f8 (diff) | |
webdav: When testing the WebDAV server, send a file with content. The empty file it was sending tickled bugs in some php WebDAV server.
Diffstat (limited to 'Remote/WebDAV.hs')
| -rw-r--r-- | Remote/WebDAV.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Remote/WebDAV.hs b/Remote/WebDAV.hs index 4c5edef72..1e4c45d19 100644 --- a/Remote/WebDAV.hs +++ b/Remote/WebDAV.hs @@ -191,7 +191,7 @@ testDav url (Just (u, p)) = do makeParentDirs void $ mkColRecursive tmpDir inLocation (tmpLocation "git-annex-test") $ do - putContentM (Nothing, L.empty) + putContentM (Nothing, L8.fromString "test") delContentM where test a = liftIO $ |