on master help sign in
fix newline printing
b224366Greg Weber
exe/yaml2json.hs+1−1
@@ -9,7 +9,7 @@ import Data.ByteString.Lazy (putStr)
9import Data.ByteString (getContents)
9import Data.ByteString (getContents)
10
10
11helpMessage :: IO ()
11helpMessage :: IO ()
12−helpMessage = print "yaml2json FILE\n use - to indicate stdin" >> exitFailure
12+helpMessage = putStrLn "yaml2json FILE\n use - as FILE to indicate stdin" >> exitFailure
13
13
14showJSON ejson =
14showJSON ejson =
15 case ejson of
15 case ejson of