diff options
author | Joey Hess <joey@kitenet.net> | 2013-05-11 18:23:41 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2013-05-11 18:23:41 -0400 |
commit | 618af8b6772d25ab27336d240ecddae7ae207561 (patch) | |
tree | 9e48ea32c7cbe11603ab599b5e0616457cd4de4e /Git/CurrentRepo.hs | |
parent | db56fab07ddd6910b1dc08f4fa242c267c469eb5 (diff) |
clean up from windows porting
Diffstat (limited to 'Git/CurrentRepo.hs')
-rwxr-xr-x | Git/CurrentRepo.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Git/CurrentRepo.hs b/Git/CurrentRepo.hs index 4b8c1fca8..769956aee 100755 --- a/Git/CurrentRepo.hs +++ b/Git/CurrentRepo.hs @@ -11,13 +11,13 @@ module Git.CurrentRepo where #ifndef __WINDOWS__ import System.Posix.Directory (changeWorkingDirectory) -import System.Posix.Env (getEnv, unsetEnv) #endif import Common import Git.Types import Git.Construct import qualified Git.Config +import Utility.Env {- Gets the current git repository. - @@ -51,7 +51,7 @@ get = do v <- getEnv s case v of Just d -> do - unsetEnv s + void $ unsetEnv s Just <$> absPath d Nothing -> return Nothing #else |