cosmetic changes.

This commit is contained in:
Kazu Yamamoto 2013-03-12 16:19:44 +09:00
parent 6102c2d1b6
commit 864666490a
2 changed files with 6 additions and 6 deletions

View File

@ -6,9 +6,9 @@ import Language.Haskell.HLint
import Types
lintSyntax :: Options -> String -> IO String
lintSyntax opt file = pretty <$> lint opt file
lintSyntax opt file = pack <$> lint opt file
where
pretty = unlines . map (intercalate "\0" . lines)
pack = unlines . map (intercalate "\0" . lines)
lint :: Options -> String -> IO [String]
lint opt file = map show <$> hlint ([file, "--quiet"] ++ hlintOpts opt)