From 10fa4567bd1761a1e26b841128aff9781e7e0df3 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 26 Oct 2014 13:39:44 -0400 Subject: setenv for windows --- Git/Index.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Git/Index.hs') diff --git a/Git/Index.hs b/Git/Index.hs index d712245..c42ac42 100644 --- a/Git/Index.hs +++ b/Git/Index.hs @@ -21,8 +21,8 @@ import Utility.Env override :: FilePath -> IO (IO ()) override index = do res <- getEnv var - void $ setEnv var index True - return $ void $ reset res + setEnv var index True + return $ reset res where var = "GIT_INDEX_FILE" reset (Just v) = setEnv var v True -- cgit v1.2.3