summaryrefslogtreecommitdiff
path: root/Remote
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-05-18 18:20:53 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-05-18 18:20:53 -0400
commiteb6cb1b87f2d7016ddd4386e2a3bb20d8ea3c036 (patch)
tree1f9f35e7ca3db662bd67ec759de90267149319fa /Remote
parentbb4f31a0ee496ffb83d31cc56f8827e47605d763 (diff)
Add support for core.worktree, and fix support for GIT_WORK_TREE and GIT_DIR.
The environment needs to override git-config. Changed when git config is read, and avoid rereading it once it's been read. chdir for both worktree settings.
Diffstat (limited to 'Remote')
-rw-r--r--Remote/Git.hs8
1 files changed, 2 insertions, 6 deletions
diff --git a/Remote/Git.hs b/Remote/Git.hs
index 35928b96c..79439b784 100644
--- a/Remote/Git.hs
+++ b/Remote/Git.hs
@@ -179,12 +179,8 @@ repoAvail r
- monad using that repository. -}
onLocal :: Git.Repo -> Annex a -> IO a
onLocal r a = do
- -- Avoid re-reading the repository's configuration if it was
- -- already read.
- state <- if M.null $ Git.config r
- then Annex.new r
- else return $ Annex.newState r
- Annex.eval state $ do
+ s <- Annex.new r
+ Annex.eval s $ do
-- No need to update the branch; its data is not used
-- for anything onLocal is used to do.
Annex.BranchState.disableUpdate