Commit 9afd164f authored by Andrey Mokhov's avatar Andrey Mokhov
Browse files

Remove error from putSuccess :-)

parent 020d528e
......@@ -69,10 +69,8 @@ putBuild :: String -> Action ()
putBuild = putColoured White
-- A more colourful version of error
putSuccess :: String -> Action a
putSuccess msg = do
putColoured Green msg
error $ "GHC build system error: " ++ msg
putSuccess :: String -> Action ()
putSuccess = putColoured Green
-- A more colourful version of error
putError :: String -> Action a
......
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