summaryrefslogtreecommitdiff
path: root/GitAnnex.hs
diff options
context:
space:
mode:
Diffstat (limited to 'GitAnnex.hs')
-rw-r--r--GitAnnex.hs5
1 files changed, 2 insertions, 3 deletions
diff --git a/GitAnnex.hs b/GitAnnex.hs
index 399b26ef7..f416b7bea 100644
--- a/GitAnnex.hs
+++ b/GitAnnex.hs
@@ -116,9 +116,8 @@ options = commonOptions ++
setnumcopies v = Annex.changeState $ \s -> s {Annex.forcenumcopies = readMaybe v }
setgitconfig :: String -> Annex ()
setgitconfig v = do
- g <- gitRepo
- g' <- liftIO $ Git.configStore g v
- Annex.changeState $ \s -> s { Annex.repo = g' }
+ newg <- inRepo $ Git.configStore v
+ Annex.changeState $ \s -> s { Annex.repo = newg }
header :: String
header = "Usage: git-annex command [option ..]"