@@ -2,10 +2,6 @@
2{-# LANGUAGE RecordWildCards #-}
2{-# LANGUAGE RecordWildCards #-}
3{-# LANGUAGE NamedFieldPuns #-}
3{-# LANGUAGE NamedFieldPuns #-}
5−#ifndef MIN_VERSION_base
6−#defined MIN_VERSION_base(x,y,z) 1
9-- | Output interface.
5-- | Output interface.
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
49import Data.List (isPrefixOf)
45import Data.List (isPrefixOf)
51−#if !(MIN_VERSION_base(4,8,0))
52−import Data.Monoid (mappend, (<>))
54import Data.Monoid ((<>))
46import Data.Monoid ((<>))
57-- | Returns a `Output` for the terminal specified in `Config`
48-- | Returns a `Output` for the terminal specified in `Config`