aboutsummaryrefslogtreecommitdiff
path: root/Locations.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-09-26 12:06:44 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-09-26 14:42:32 -0400
commit4e48ea601400dac5f432b1eaa454acd219a029ad (patch)
tree30b3eb2964e2e3fce4781a50b0d6292fbfedfa28 /Locations.hs
parent70bb36cfc783a27345aa7eba2c9f89ecce748898 (diff)
store S3 creds in a 600 mode file inside the local git repo
Diffstat (limited to 'Locations.hs')
-rw-r--r--Locations.hs8
1 files changed, 7 insertions, 1 deletions
diff --git a/Locations.hs b/Locations.hs
index 98eabb172..72baf273b 100644
--- a/Locations.hs
+++ b/Locations.hs
@@ -20,6 +20,7 @@ module Locations (
gitAnnexUnusedLog,
gitAnnexFsckState,
gitAnnexTransferDir,
+ gitAnnexCredsDir,
gitAnnexJournalDir,
gitAnnexJournalLock,
gitAnnexIndex,
@@ -135,7 +136,12 @@ gitAnnexUnusedLog prefix r = gitAnnexDir r </> (prefix ++ "unused")
gitAnnexFsckState :: Git.Repo -> FilePath
gitAnnexFsckState r = gitAnnexDir r </> "fsckstate"
-{- .git/annex/transfer/ is used is used to record keys currently
+{- .git/annex/creds/ is used to store credentials to access some special
+ - remotes. -}
+gitAnnexCredsDir :: Git.Repo -> FilePath
+gitAnnexCredsDir r = addTrailingPathSeparator $ gitAnnexDir r </> "creds"
+
+{- .git/annex/transfer/ is used to record keys currently
- being transferred, and other transfer bookkeeping info. -}
gitAnnexTransferDir :: Git.Repo -> FilePath
gitAnnexTransferDir r = addTrailingPathSeparator $ gitAnnexDir r </> "transfer"