hlint hack.

CabalApi.hs

@@ -25,7 +25,7 @@ cabalParseFile =  readPackageDescription silent
 
 -- Causes error, catched in the upper function.
 cabalBuildInfo :: GenericPackageDescription -> IO BuildInfo
-cabalBuildInfo pd = do
+cabalBuildInfo pd =
     return . fromJust $ fromLibrary pd <|> fromExecutable pd
   where
     fromLibrary c     = libBuildInfo . condTreeData <$> condLibrary c

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