make gitDir absolute

This commit is contained in:
Joey Hess 2011-08-19 12:59:07 -04:00
parent 7cedd28ab0
commit e97fede8cd
3 changed files with 8 additions and 8 deletions

View file

@ -20,7 +20,7 @@ usage :: IO a
usage = error $ "bad parameters\n\n" ++ header
tmpIndex :: Git.Repo -> FilePath
tmpIndex g = Git.workTree g </> Git.gitDir g </> "index.git-union-merge"
tmpIndex g = Git.gitDir g </> "index.git-union-merge"
setup :: Git.Repo -> IO ()
setup g = cleanup g -- idempotency