summaryrefslogtreecommitdiff
path: root/Locations.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-10-12 20:20:59 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-10-12 20:20:59 -0400
commit490eb66be40d4e9e6a5e4d89f67610e073e7574f (patch)
tree785fe3462717ce3f6d3100f49efb472334b4cdff /Locations.hs
parentb7858ada038084c8455cdf9d3598382308dc52b3 (diff)
update
Diffstat (limited to 'Locations.hs')
-rw-r--r--Locations.hs7
1 files changed, 4 insertions, 3 deletions
diff --git a/Locations.hs b/Locations.hs
index 59f9df727..925aa39e5 100644
--- a/Locations.hs
+++ b/Locations.hs
@@ -30,9 +30,10 @@ keyFile key = replace "/" "%" $ replace "%" "%%" key
annexLocation :: State -> Key -> FilePath
annexLocation state key = gitDir (repo state) ++ "/annex/" ++ (keyFile key)
-{- Name of state file that holds the key for an annexed file,
- - using a given backend. -}
+{- The mapping from filename to its key is stored in the .git-annex directory,
+ - in a file named `key/$filename.$backend` -}
backendFile :: State -> Backend -> FilePath -> String
backendFile state backend file =
- gitStateDir (repo state) ++ (gitRelative (repo state) file) ++
+ gitStateDir (repo state) ++ "key/" ++
+ (gitRelative (repo state) file) ++
"." ++ (name backend)