mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

update

Browse source
This commit is contained in:
Joey Hess 2010-10-10 18:05:37 -04:00
parent dce9c2e080
commit e5514e0cb0
12 changed files with 101 additions and 36 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Locations.hs
View file

@ -3,10 +3,11 @@
module Locations where
import Types
import GitRepo
{- An annexed file's content is stored somewhere under .git/annex/ -}
annexDir :: GitRepo -> String -> IO FilePath
annexDir :: GitRepo -> Key -> IO FilePath
annexDir repo key = do
dir <- gitDir repo
return $ dir ++ "/annex/" ++ key