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

git-annex, git-union-merge: Support GIT_DIR and GIT_WORK_TREE.

Browse source 
Note that GIT_WORK_TREE cannot influence GIT_DIR; that is necessary for
git-fake-bare and vcsh type things to work.
This commit is contained in:
Joey Hess 2012-01-13 12:52:09 -04:00
parent daff9029ba
commit 1ae780ee79
6 changed files with 26 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

2
test.hs
View file

@ -727,7 +727,7 @@ git_annex_expectoutput command params expected = do
-- are not run; this should only be used for actions that query state.
annexeval :: Types.Annex a -> IO a
annexeval a = do
g <- Git.Construct.fromCwd
g <- Git.Construct.fromCurrent
g' <- Git.Config.read g
s <- Annex.new g'
Annex.eval s { Annex.output = Annex.QuietOutput } a