diff options
Diffstat (limited to 'Git/CurrentRepo.hs')
-rwxr-xr-x | Git/CurrentRepo.hs | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/Git/CurrentRepo.hs b/Git/CurrentRepo.hs index 769956aee..2a8807488 100755 --- a/Git/CurrentRepo.hs +++ b/Git/CurrentRepo.hs @@ -9,10 +9,6 @@ module Git.CurrentRepo where -#ifndef __WINDOWS__ -import System.Posix.Directory (changeWorkingDirectory) -#endif - import Common import Git.Types import Git.Construct @@ -39,11 +35,9 @@ get = do case wt of Nothing -> return r Just d -> do -#ifndef __WINDOWS__ cwd <- getCurrentDirectory unless (d `dirContains` cwd) $ - changeWorkingDirectory d -#endif + setCurrentDirectory d return $ addworktree wt r where pathenv s = do |