aboutsummaryrefslogtreecommitdiff
path: root/Remote/Glacier.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2014-03-04 23:22:24 -0400
committerGravatar Joey Hess <joey@kitenet.net>2014-03-04 23:22:24 -0400
commite8b05ace2e76b17298fdaf1b635d9a4aad700bb9 (patch)
tree7e340822cdefc93fbfeeea935bfb91ea6b975aab /Remote/Glacier.hs
parent95db7c74bf1d732cde4fbfdc02201319eab89602 (diff)
glacier: Pass --region to glacier checkpresent.
I suppose this is not necessary when it has a local cache, so I didn't notice it was missing.
Diffstat (limited to 'Remote/Glacier.hs')
-rw-r--r--Remote/Glacier.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Remote/Glacier.hs b/Remote/Glacier.hs
index 33719926c..fe6f53a77 100644
--- a/Remote/Glacier.hs
+++ b/Remote/Glacier.hs
@@ -196,7 +196,7 @@ checkPresent r k = do
else return $ Right False
Left err -> return $ Left err
- params =
+ params = glacierParams (config r)
[ Param "archive"
, Param "checkpresent"
, Param $ getVault $ config r