deMaybe credPairRemoteKey

It's always Just
This commit is contained in:
Joey Hess 2018-12-04 13:37:43 -04:00
parent b184f158a5
commit 1308a76bf1
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
4 changed files with 18 additions and 19 deletions

View file

@ -328,7 +328,7 @@ davCreds :: UUID -> CredPairStorage
davCreds u = CredPairStorage
{ credPairFile = fromUUID u
, credPairEnvironment = ("WEBDAV_USERNAME", "WEBDAV_PASSWORD")
, credPairRemoteKey = Just "davcreds"
, credPairRemoteKey = "davcreds"
}
{- Content-Type to use for files uploaded to WebDAV. -}