haskell/haskell-ide-engine
1
1
Fork 0
mirror of https://github.com/haskell/haskell-ide-engine.git synced 2024-09-11 11:05:30 +03:00
Code Issues Projects Releases Wiki Activity

Catch all IOException's in the $PATH hack

Browse Source
This commit is contained in:
jneira 2019-11-11 08:45:43 +01:00
parent 98acf41752
commit 3224d7005f
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
install/src/Stack.hs
View File

@ -105,8 +105,8 @@ stackBuildFailMsg =
withoutStackCachedBinaries :: Action a -> Action a
withoutStackCachedBinaries action = do
let getEnvErrorHandler e | isDoesNotExistError e = return Nothing
| otherwise = throwIO e
let getEnvErrorHandler :: IOException -> IO (Maybe String)
getEnvErrorHandler _ = return Nothing
mbPath <- liftIO (lookupEnv "PATH" `catch` getEnvErrorHandler)