Write error messages for parse failures to stderr
commitad447565c85c0d835e5299d9883a9c65a5488527
authorMatvey Aksenov <matvey.aksenov@gmail.com>
dateThu 18 Jun 2015, 19:58 (11 years ago)
parent6b98c02
src/Cabal2Nix/Package.hs+1−1
@@ -137,7 +137,7 @@ cabalFromFile failHard file =
137137 Cabal.ParseFailed e | failHard -> do
138138 let (line, err) = ParseUtils.locatedErrorMsg e
139139 msg = maybe "" ((++ ": ") . show) line ++ err
140− putStrLn $ "*** error parsing cabal file: " ++ msg
140+ hPutStrLn stderr $ "*** error parsing cabal file: " ++ msg
141141 exitFailure
142142 Cabal.ParseFailed _ -> return Nothing
143143 Cabal.ParseOk _ a -> return (Just a)