Commit a854d92c authored by Valentin Reis's avatar Valentin Reis
Browse files

return "" with readProcess.

parent f7ea182f
Pipeline #5879 passed with stages
in 49 seconds
...@@ -327,7 +327,7 @@ readProcessVerbose verbosity name arguments envVars = do ...@@ -327,7 +327,7 @@ readProcessVerbose verbosity name arguments envVars = do
) )
>>= \case >>= \case
Just r -> return r Just r -> return r
Nothing -> die "readProcess returned more than one line." Nothing -> return ""
runProcessVerbose :: Verbosity -> Text -> [Text] -> [(Text, Text)] -> IO () runProcessVerbose :: Verbosity -> Text -> [Text] -> [(Text, Text)] -> IO ()
runProcessVerbose a b c d = void $ readProcessVerbose a b c d runProcessVerbose a b c d = void $ readProcessVerbose a b c d
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment