hlint hack.

2013-02-12 14:21:48 +09:00
parent 42a1ea0a87
commit d115c1dacb
2 changed files with 3 additions and 3 deletions
--- a/Check.hs
+++ b/Check.hs
@@ -26,5 +26,5 @@ check opt fileName = withGHC' fileName $ checkIt `gcatch` handleErrMsg
        _ <- load LoadAllTargets
        liftIO readLog
    options
-      | expandSplice opt = ["-w:"] ++ ghcOpts opt
-      | otherwise        = ["-Wall"] ++ ghcOpts opt
+      | expandSplice opt = "-w:"   : ghcOpts opt
+      | otherwise        = "-Wall" : ghcOpts opt