diff -up hlint-1.9.10/src/HsColour.hs~ hlint-1.9.10/src/HsColour.hs --- hlint-1.9.10/src/HsColour.hs~ 2014-10-20 06:20:38.000000000 +0900 +++ hlint-1.9.10/src/HsColour.hs 2016-06-21 09:46:30.231542683 +0900 @@ -22,6 +22,6 @@ hsColourConsole = do return $ TTY.hscolour prefs hsColourHTML :: String -> String -hsColourHTML = CSS.hscolour False +hsColourHTML = CSS.hscolour False 1 #endif diff -up hlint-1.9.10/src/HSE/FreeVars.hs~ hlint-1.9.10/src/HSE/FreeVars.hs --- hlint-1.9.10/src/HSE/FreeVars.hs~ 2014-10-20 06:20:38.000000000 +0900 +++ hlint-1.9.10/src/HSE/FreeVars.hs 2016-06-21 09:36:14.757740411 +0900 @@ -3,7 +3,7 @@ module HSE.FreeVars(FreeVars, freeVars, vars, varss, pvars, declBind) where import HSE.Type -import Data.Monoid +import Data.Monoid hiding (Alt) import qualified Data.Set as Set import Data.Set(Set) diff -up hlint-1.9.10/src/Util.hs~ hlint-1.9.10/src/Util.hs --- hlint-1.9.10/src/Util.hs~ 2014-10-20 06:20:38.000000000 +0900 +++ hlint-1.9.10/src/Util.hs 2016-06-21 09:50:15.080178079 +0900 @@ -61,7 +61,7 @@ listM' x = length x `seq` return x --------------------------------------------------------------------- -- PRELUDE -notNull = not . null +notNull p = not $ null p headDef :: a -> [a] -> a headDef x [] = x