From b38cd51131dfd1037e119ec927fd8881cc2efe18 Mon Sep 17 00:00:00 2001 From: jao Date: Wed, 31 Jan 2018 19:35:46 +0100 Subject: Let's try travis.sh (hlint warnings) again --- .travis.yml | 1 + src/Bitmap.hs | 4 ++-- src/Signal.hs | 2 +- src/Window.hs | 4 ++-- 4 files changed, 6 insertions(+), 5 deletions(-) diff --git a/.travis.yml b/.travis.yml index 79dfa16..97e32e4 100644 --- a/.travis.yml +++ b/.travis.yml @@ -16,4 +16,5 @@ install: - wget https://raw.github.com/ndmitchell/hlint/master/misc/travis.sh script: + - sh ./travis.sh src - cabal configure --enable-tests -fall_extensions && cabal build && cabal test diff --git a/src/Bitmap.hs b/src/Bitmap.hs index 11728d4..494c39c 100644 --- a/src/Bitmap.hs +++ b/src/Bitmap.hs @@ -2,7 +2,7 @@ ----------------------------------------------------------------------------- -- | -- Module : Bitmap --- Copyright : (C) 2013, 2015, 2017 Alexander Polakov +-- Copyright : (C) 2013, 2015, 2017, 2018 Alexander Polakov -- License : BSD3 -- -- Maintainer : jao@gnu.org @@ -18,7 +18,7 @@ module Bitmap import Control.Monad import Control.Monad.Trans(MonadIO(..)) -import Data.Map hiding (foldr, map, filter) +import Data.Map hiding (map, filter) import Graphics.X11.Xlib import System.Directory (doesFileExist) import System.FilePath (()) diff --git a/src/Signal.hs b/src/Signal.hs index a828db6..27db46b 100644 --- a/src/Signal.hs +++ b/src/Signal.hs @@ -20,7 +20,7 @@ module Signal where import Data.Typeable (Typeable) import Control.Concurrent.STM -import Control.Exception hiding (handle) +import Control.Exception import System.Posix.Signals import Graphics.X11.Types (Button) import Graphics.X11.Xlib.Types (Position) diff --git a/src/Window.hs b/src/Window.hs index d2506db..829ab8d 100644 --- a/src/Window.hs +++ b/src/Window.hs @@ -1,7 +1,7 @@ ----------------------------------------------------------------------------- -- | -- Module : Window --- Copyright : (c) 2011-17 Jose A. Ortega Ruiz +-- Copyright : (c) 2011-18 Jose A. Ortega Ruiz -- : (c) 2012 Jochen Keil -- License : BSD-style (see LICENSE) -- @@ -18,7 +18,7 @@ module Window where import Prelude import Control.Applicative ((<$>)) import Control.Monad (when, unless) -import Graphics.X11.Xlib hiding (textExtents, textWidth) +import Graphics.X11.Xlib hiding (textExtents) import Graphics.X11.Xlib.Extras import Graphics.X11.Xinerama import Foreign.C.Types (CLong) -- cgit v1.2.3