diff options
Diffstat (limited to 'Git/Config.hs')
-rw-r--r-- | Git/Config.hs | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/Git/Config.hs b/Git/Config.hs index 15109319a..44e0ad9a9 100644 --- a/Git/Config.hs +++ b/Git/Config.hs @@ -66,10 +66,9 @@ global = do home <- myHomeDir ifM (doesFileExist $ home </> ".gitconfig") ( do - repo <- Git.Construct.fromUnknown - repo' <- withHandle StdoutHandle createProcessSuccess p $ - hRead repo - return $ Just repo' + repo <- withHandle StdoutHandle createProcessSuccess p $ + hRead (Git.Construct.fromUnknown) + return $ Just repo , return Nothing ) where |