diff options
author | Joey Hess <joeyh@joeyh.name> | 2016-05-23 17:27:15 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2016-05-23 17:33:32 -0400 |
commit | 9a8ff4c743fae057520caebb59a760caf29001b4 (patch) | |
tree | 6fb8bde572a73366a6749c07ecf711fe550a1bd5 /Remote/WebDAV.hs | |
parent | 063d84ddd33f1aa0624cf5f363f2c58397b98562 (diff) |
plumb RemoteGitConfig through to decryptCipher
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 413516e89..dd0ff5768 100644 --- a/Remote/WebDAV.hs +++ b/Remote/WebDAV.hs @@ -87,7 +87,7 @@ webdavSetup mu mcreds c gc = do url <- case M.lookup "url" c of Nothing -> error "Specify url=" Just url -> return url - (c', encsetup) <- encryptionSetup c + (c', encsetup) <- encryptionSetup c gc creds <- maybe (getCreds c' gc u) (return . Just) mcreds testDav url creds gitConfigSpecialRemote u c' "webdav" "true" |