deMaybe credPairRemoteKey
It's always Just
This commit is contained in:
parent
b184f158a5
commit
1308a76bf1
4 changed files with 18 additions and 19 deletions
|
@ -23,7 +23,7 @@ creds :: UUID -> CredPairStorage
|
|||
creds u = CredPairStorage
|
||||
{ credPairFile = fromUUID u
|
||||
, credPairEnvironment = ("AWS_ACCESS_KEY_ID", "AWS_SECRET_ACCESS_KEY")
|
||||
, credPairRemoteKey = Just "s3creds"
|
||||
, credPairRemoteKey = "s3creds"
|
||||
}
|
||||
|
||||
data Service = S3 | Glacier
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue