summaryrefslogtreecommitdiff
path: root/Annex/GitOverlay.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Annex/GitOverlay.hs')
-rw-r--r--Annex/GitOverlay.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Annex/GitOverlay.hs b/Annex/GitOverlay.hs
index 2eae5e7fe..2193b7449 100644
--- a/Annex/GitOverlay.hs
+++ b/Annex/GitOverlay.hs
@@ -19,7 +19,7 @@ import qualified Annex
{- Runs an action using a different git index file. -}
withIndexFile :: FilePath -> Annex a -> Annex a
withIndexFile f a = do
- f' <- inRepo $ indexEnvVal f
+ f' <- liftIO $ indexEnvVal f
withAltRepo
(\g -> addGitEnv g indexEnv f')
(\g g' -> g' { gitEnv = gitEnv g })