clean up from windows porting

This commit is contained in:
Joey Hess 2013-05-11 18:23:41 -04:00
parent d6bf05a66d
commit 18bdff3fae
28 changed files with 57 additions and 72 deletions

View file

@ -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

View file

@ -7,7 +7,7 @@
module Git.Index where
import System.Posix.Env (setEnv, unsetEnv, getEnv)
import Utility.Env
{- Forces git to use the specified index file.
-