diff --git a/Changelog.md b/Changelog.md
--- a/Changelog.md
+++ b/Changelog.md
@@ -1,3 +1,8 @@
+1.1.1.1 (2018-04-13)
+====================
+
+* Support for GHC-8.4.1.
+
 1.1.1.0 (2017-01-26)
 ====================
 
diff --git a/Text/PrettyPrint/Leijen/Text.hs b/Text/PrettyPrint/Leijen/Text.hs
--- a/Text/PrettyPrint/Leijen/Text.hs
+++ b/Text/PrettyPrint/Leijen/Text.hs
@@ -126,7 +126,6 @@
 
 import           Data.Int               (Int64)
 import           Data.List              (intersperse)
-import           Data.Monoid            (Monoid(..))
 import qualified Data.Text              as TS
 import           Data.Text.Lazy         (Text)
 import qualified Data.Text.Lazy         as T
diff --git a/Text/PrettyPrint/Leijen/Text/Monadic.hs b/Text/PrettyPrint/Leijen/Text/Monadic.hs
--- a/Text/PrettyPrint/Leijen/Text/Monadic.hs
+++ b/Text/PrettyPrint/Leijen/Text/Monadic.hs
@@ -70,19 +70,24 @@
    ) where
 
 import Prelude ()
-import Prelude.Compat hiding ((<$>))
 
+#if MIN_VERSION_base (4,9,0)
+import Prelude.Compat hiding ((<$>), (<>))
+#else
+import Prelude.Compat hiding ((<$>))
+#endif
 
-import           Text.PrettyPrint.Leijen.Text (Doc, Pretty (..), SimpleDoc (..),
-                                               displayB, displayIO, displayT, displayTStrict,
-                                               hPutDoc, putDoc, renderCompact,
-                                               renderOneLine, renderPretty)
+import           Text.PrettyPrint.Leijen.Text (Doc, Pretty(..), SimpleDoc(..),
+                                               displayB, displayIO, displayT,
+                                               displayTStrict, hPutDoc, putDoc,
+                                               renderCompact, renderOneLine,
+                                               renderPretty)
 import qualified Text.PrettyPrint.Leijen.Text as PP
 
-import Control.Applicative (liftA2, liftA3)
-import Data.String    (IsString (..))
-import qualified Data.Text as TS
-import Data.Text.Lazy (Text)
+import           Control.Applicative (liftA2, liftA3)
+import           Data.String         (IsString(..))
+import qualified Data.Text           as TS
+import           Data.Text.Lazy      (Text)
 
 infixr 5 </>,<//>,<$>,<$$>
 infixr 6 <>,<+>,<++>
diff --git a/wl-pprint-text.cabal b/wl-pprint-text.cabal
--- a/wl-pprint-text.cabal
+++ b/wl-pprint-text.cabal
@@ -1,5 +1,5 @@
 Name:                wl-pprint-text
-Version:             1.1.1.0
+Version:             1.1.1.1
 Synopsis:            A Wadler/Leijen Pretty Printer for Text values
 Description:         A clone of wl-pprint for use with the text library.
 License:             BSD3
@@ -10,7 +10,8 @@
 Category:            Text
 Build-type:          Simple
 Tested-With:        GHC == 7.4.2, GHC == 7.6.3, GHC == 7.8.4,
-                    GHC == 7.10.2, GHC == 8.0.1, GHC == 8.1.*
+                    GHC == 7.10.2, GHC == 8.0.1, GHC == 8.2.2,
+                    GHC == 8.4.1, GHC == 8.5.*
 Cabal-version:       >=1.6
 Extra-Source-Files: Changelog.md
                     README.md
@@ -23,5 +24,6 @@
   Exposed-modules:     Text.PrettyPrint.Leijen.Text,
                        Text.PrettyPrint.Leijen.Text.Monadic
   Build-depends:       base >= 4.5.0.0 && < 5,
-                       base-compat >= 0.9 && < 0.10,
+                       base-compat == 0.10.*,
                        text >= 0.11.0.0 && < 1.3.0.0
+  GHC-Options:         -Wall