diff options
author | jao <jao@gnu.org> | 2020-08-07 03:33:15 +0100 |
---|---|---|
committer | jao <jao@gnu.org> | 2020-08-07 03:33:15 +0100 |
commit | 0e7c39d9ec6719a32eec0b696d7167faf6598757 (patch) | |
tree | ef731d961475e106ea12ad48bc39c6332e81c719 /src/Xmobar/Plugins | |
parent | f60a105dbd866cb1ac23fb3277ff42f896c7f056 (diff) | |
download | xmobar-0e7c39d9ec6719a32eec0b696d7167faf6598757.tar.gz xmobar-0e7c39d9ec6719a32eec0b696d7167faf6598757.tar.bz2 |
Redundant imports (mostly <$>) removed
Diffstat (limited to 'src/Xmobar/Plugins')
-rw-r--r-- | src/Xmobar/Plugins/MarqueePipeReader.hs | 1 | ||||
-rw-r--r-- | src/Xmobar/Plugins/Monitors/Bright.hs | 2 | ||||
-rw-r--r-- | src/Xmobar/Plugins/Monitors/Common/Parsers.hs | 3 | ||||
-rw-r--r-- | src/Xmobar/Plugins/Monitors/MultiCpu.hs | 1 | ||||
-rw-r--r-- | src/Xmobar/Plugins/Monitors/Net.hs | 1 | ||||
-rw-r--r-- | src/Xmobar/Plugins/Monitors/Volume.hs | 3 | ||||
-rw-r--r-- | src/Xmobar/Plugins/PipeReader.hs | 1 |
7 files changed, 2 insertions, 10 deletions
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) |