diff options
Diffstat (limited to 'Remote/Glacier.hs')
| -rw-r--r-- | Remote/Glacier.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Remote/Glacier.hs b/Remote/Glacier.hs index f960c517f..55b704a33 100644 --- a/Remote/Glacier.hs +++ b/Remote/Glacier.hs @@ -221,7 +221,7 @@ glacierParams c params = datacenter:params (fromJust $ M.lookup "datacenter" c) glacierEnv :: RemoteConfig -> UUID -> Annex (Maybe [(String, String)]) -glacierEnv c u = go =<< getRemoteCredPair "glacier" c creds +glacierEnv c u = go =<< getRemoteCredPairFor "glacier" c creds where go Nothing = return Nothing go (Just (user, pass)) = do |