update

Backend.hs

@@ -9,9 +9,6 @@
  - This key can later be used to retrieve the file's content (its value). This
  - key generation must be stable for a given file content, name, and size.
  - 
- - The mapping from filename to its key is stored in the .git-annex directory,
- - in a file named `$filename.$backend`
- - 
  - Multiple pluggable backends are supported, and more than one can be used
  - to store different files' contents in a given repository.
  - -}

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)