on master help sign in
Output: remove conditional "mappend" import entirely since nothing uses it
677190bJonathan Daugherty
src/Graphics/Vty/Output.hs−9
@@ -2,10 +2,6 @@
2{-# LANGUAGE RecordWildCards #-}
2{-# LANGUAGE RecordWildCards #-}
3{-# LANGUAGE NamedFieldPuns #-}
3{-# LANGUAGE NamedFieldPuns #-}
4
4
5−#ifndef MIN_VERSION_base
6−#defined MIN_VERSION_base(x,y,z) 1
7−#endif
8−
9-- | Output interface.
5-- | Output interface.
10--
6--
11-- Access to the current terminal or a specific terminal device.
7-- Access to the current terminal or a specific terminal device.
@@ -47,12 +43,7 @@ import Blaze.ByteString.Builder (writeToByteString)
47import Control.Monad.Trans
43import Control.Monad.Trans
48
44
49import Data.List (isPrefixOf)
45import Data.List (isPrefixOf)
50−
51−#if !(MIN_VERSION_base(4,8,0))
52−import Data.Monoid (mappend, (<>))
53−#else
54import Data.Monoid ((<>))
46import Data.Monoid ((<>))
55−#endif
56
47
57-- | Returns a `Output` for the terminal specified in `Config`
48-- | Returns a `Output` for the terminal specified in `Config`
58--
49--