From 0e7c39d9ec6719a32eec0b696d7167faf6598757 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Fri, 7 Aug 2020 03:33:15 +0100
Subject: Redundant imports (mostly <$>) removed

---
 src/Xmobar/Plugins/MarqueePipeReader.hs       | 1 -
 src/Xmobar/Plugins/Monitors/Bright.hs         | 2 --
 src/Xmobar/Plugins/Monitors/Common/Parsers.hs | 3 +--
 src/Xmobar/Plugins/Monitors/MultiCpu.hs       | 1 -
 src/Xmobar/Plugins/Monitors/Net.hs            | 1 -
 src/Xmobar/Plugins/Monitors/Volume.hs         | 3 +--
 src/Xmobar/Plugins/PipeReader.hs              | 1 -
 7 files changed, 2 insertions(+), 10 deletions(-)

(limited to 'src/Xmobar/Plugins')

diff --git a/src/Xmobar/Plugins/MarqueePipeReader.hs b/src/Xmobar/Plugins/MarqueePipeReader.hs
index f1fdee0..075503c 100644
--- a/src/Xmobar/Plugins/MarqueePipeReader.hs
+++ b/src/Xmobar/Plugins/MarqueePipeReader.hs
@@ -22,7 +22,6 @@ import Control.Concurrent(forkIO, threadDelay)
 import Control.Concurrent.STM (TChan, atomically, writeTChan, tryReadTChan, newTChan)
 import Control.Exception
 import Control.Monad(forever, unless)
-import Control.Applicative ((<$>))
 
 type Length = Int       -- length of the text to display
 type Rate = Int         -- delay in tenth seconds
diff --git a/src/Xmobar/Plugins/Monitors/Bright.hs b/src/Xmobar/Plugins/Monitors/Bright.hs
index 5f0cd0d..12790e1 100644
--- a/src/Xmobar/Plugins/Monitors/Bright.hs
+++ b/src/Xmobar/Plugins/Monitors/Bright.hs
@@ -14,7 +14,6 @@
 
 module Xmobar.Plugins.Monitors.Bright (brightConfig, runBright) where
 
-import Control.Applicative ((<$>))
 import Control.Exception (SomeException, handle)
 import qualified Data.ByteString.Lazy.Char8 as B
 import System.FilePath ((</>))
@@ -89,4 +88,3 @@ readBright files = do
   return (currVal / maxVal)
   where grab f = handle handler (read . B.unpack <$> B.readFile f)
         handler = const (return 0) :: SomeException -> IO Float
-
diff --git a/src/Xmobar/Plugins/Monitors/Common/Parsers.hs b/src/Xmobar/Plugins/Monitors/Common/Parsers.hs
index db2a652..c058154 100644
--- a/src/Xmobar/Plugins/Monitors/Common/Parsers.hs
+++ b/src/Xmobar/Plugins/Monitors/Common/Parsers.hs
@@ -4,7 +4,7 @@
 ------------------------------------------------------------------------------
 -- |
 -- Module: Xmobar.Plugins.Monitors.Parsers
--- Copyright: (c) 2018 Jose Antonio Ortega Ruiz
+-- Copyright: (c) 2018, 2020 Jose Antonio Ortega Ruiz
 -- License: BSD3-style (see LICENSE)
 --
 -- Maintainer: jao@gnu.org
@@ -36,7 +36,6 @@ module Xmobar.Plugins.Monitors.Common.Parsers ( runP
 
 import Xmobar.Plugins.Monitors.Common.Types
 
-import Control.Applicative ((<$>))
 import qualified Data.Map as Map
 import System.Console.GetOpt (ArgOrder(Permute), OptDescr, getOpt)
 import Text.ParserCombinators.Parsec
diff --git a/src/Xmobar/Plugins/Monitors/MultiCpu.hs b/src/Xmobar/Plugins/Monitors/MultiCpu.hs
index 936bb2e..0bef8cf 100644
--- a/src/Xmobar/Plugins/Monitors/MultiCpu.hs
+++ b/src/Xmobar/Plugins/Monitors/MultiCpu.hs
@@ -15,7 +15,6 @@
 module Xmobar.Plugins.Monitors.MultiCpu (startMultiCpu) where
 
 import Xmobar.Plugins.Monitors.Common
-import Control.Applicative ((<$>))
 import qualified Data.ByteString.Lazy.Char8 as B
 import Data.List (isPrefixOf, transpose, unfoldr)
 import Data.IORef (IORef, newIORef, readIORef, writeIORef)
diff --git a/src/Xmobar/Plugins/Monitors/Net.hs b/src/Xmobar/Plugins/Monitors/Net.hs
index 97deacd..23e0154 100644
--- a/src/Xmobar/Plugins/Monitors/Net.hs
+++ b/src/Xmobar/Plugins/Monitors/Net.hs
@@ -23,7 +23,6 @@ module Xmobar.Plugins.Monitors.Net (
 import Xmobar.Plugins.Monitors.Common
 
 import Data.IORef (IORef, newIORef, readIORef, writeIORef)
-import Data.Monoid ((<>))
 import Data.Time.Clock (UTCTime, getCurrentTime, diffUTCTime)
 import Data.Word (Word64)
 import Control.Monad (forM, filterM)
diff --git a/src/Xmobar/Plugins/Monitors/Volume.hs b/src/Xmobar/Plugins/Monitors/Volume.hs
index 8840472..9492201 100644
--- a/src/Xmobar/Plugins/Monitors/Volume.hs
+++ b/src/Xmobar/Plugins/Monitors/Volume.hs
@@ -21,9 +21,8 @@ module Xmobar.Plugins.Monitors.Volume
   , VolumeOpts
   ) where
 
-import Control.Applicative ( (<$>), liftA3 )
+import Control.Applicative ( liftA3 )
 import Control.Monad ( liftM2, liftM3, mplus )
-import Data.Traversable (sequenceA)
 import Xmobar.Plugins.Monitors.Common
 import Sound.ALSA.Mixer
 import qualified Sound.ALSA.Exception as AE
diff --git a/src/Xmobar/Plugins/PipeReader.hs b/src/Xmobar/Plugins/PipeReader.hs
index 1a10abf..60f9494 100644
--- a/src/Xmobar/Plugins/PipeReader.hs
+++ b/src/Xmobar/Plugins/PipeReader.hs
@@ -21,7 +21,6 @@ import System.Posix.Files
 import Control.Concurrent(threadDelay)
 import Control.Exception
 import Control.Monad(forever, unless)
-import Control.Applicative ((<$>))
 
 data PipeReader = PipeReader String String
     deriving (Read, Show)
-- 
cgit v1.2.3