diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,5 +1,10 @@
 # Revision history for damnpacket
 
+## 1.3.1
+
+* Removed base-compat entirely, since it's not needed anywhere (the worst we get is unused
+  imports)
+
 ## 1.2.0
 
 * Minor rewrite using base-compat instead of CPP
diff --git a/damnpacket.cabal b/damnpacket.cabal
--- a/damnpacket.cabal
+++ b/damnpacket.cabal
@@ -1,5 +1,5 @@
 name:               damnpacket
-version:            1.3.0
+version:            1.3.1
 synopsis:           Parsing dAmn messages
 description:        This module provides a datatype and convenience functions for parsing,
                     manipulating, and rendering deviantART Message Network messages.
@@ -7,7 +7,7 @@
 license-file:       LICENSE
 author:             Jude Taylor
 maintainer:         me@jude.xyz
-tested-with:        GHC == 7.8.4, GHC == 7.10.3, GHC == 8.0.2, GHC == 8.2.2, GHC == 8.4.3
+tested-with:        GHC == 8.0.2, GHC == 8.2.2, GHC == 8.4.3
 category:           Network
 build-type:         Simple
 extra-source-files: ChangeLog.md
@@ -26,9 +26,8 @@
                       Network.Damn.Tablumps
                       Network.Damn.Tablumps.TH
   hs-source-dirs:     src
-  build-depends:      base                  == 4.*
+  build-depends:      base              == 4.*
                     , attoparsec
-                    , base-compat-batteries == 0.10.*
                     , bytestring
                     , fail
                     , html-entity
@@ -37,7 +36,6 @@
                     , text
                     , th-lift-instances
   default-language:   Haskell2010
-  default-extensions: NoImplicitPrelude
   ghc-options:        -Wall
 
 test-suite parse
diff --git a/src/Network/Damn.hs b/src/Network/Damn.hs
--- a/src/Network/Damn.hs
+++ b/src/Network/Damn.hs
@@ -44,13 +44,13 @@
 import qualified Data.ByteString as B
 import Data.Char
 import Data.Ix
+import Data.Semigroup
 import Data.String
 import Data.Text hiding (singleton)
 import Data.Word
 import Network.Damn.Format.Base (Formatter)
 import Network.Damn.Format.Damn.Internal (textToBytes)
 import Network.Damn.Tablumps
-import Prelude.Compat
 
 -- | A top-level dAmn message.
 --
diff --git a/src/Network/Damn/Format/Base.hs b/src/Network/Damn/Format/Base.hs
--- a/src/Network/Damn/Format/Base.hs
+++ b/src/Network/Damn/Format/Base.hs
@@ -4,7 +4,6 @@
     , Text
     ) where
 
-import Data.Either
 import Data.Text
 import Network.Damn.Tablumps
 
diff --git a/src/Network/Damn/Format/Damn.hs b/src/Network/Damn/Format/Damn.hs
--- a/src/Network/Damn/Format/Damn.hs
+++ b/src/Network/Damn/Format/Damn.hs
@@ -9,7 +9,6 @@
 import Data.Text.Encoding
 import Network.Damn.Format.Base
 import Network.Damn.Format.Damn.Internal
-import Prelude.Compat
 
 -- | @damnFormat@ transforms a raw dAmn message into the text that the
 -- sender typed into the dAmn web client.
diff --git a/src/Network/Damn/Format/Damn/Internal.hs b/src/Network/Damn/Format/Damn/Internal.hs
--- a/src/Network/Damn/Format/Damn/Internal.hs
+++ b/src/Network/Damn/Format/Damn/Internal.hs
@@ -9,11 +9,10 @@
 import Data.ByteString.Builder
 import qualified Data.ByteString.Lazy as LB (toStrict)
 import Data.Char
-import Data.Monoid.Compat
+import Data.Monoid
 import Data.Text (Text)
 import qualified Data.Text
 import Network.Damn.Tablumps.TH
-import Prelude.Compat
 
 textToBytes :: Text -> ByteString
 textToBytes =
diff --git a/src/Network/Damn/Format/IRC.hs b/src/Network/Damn/Format/IRC.hs
--- a/src/Network/Damn/Format/IRC.hs
+++ b/src/Network/Damn/Format/IRC.hs
@@ -11,12 +11,11 @@
 
 import Data.ByteString (ByteString)
 import qualified Data.ByteString as B
-import Data.Semigroup.Compat
+import Data.Semigroup
 import Data.String
 import Data.Text.Encoding
 import Network.Damn.Format.Base
 import Network.Damn.Format.Damn.Internal
-import Prelude.Compat
 
 newtype Lines =
     Lines ByteString
diff --git a/src/Network/Damn/Tablumps.hs b/src/Network/Damn/Tablumps.hs
--- a/src/Network/Damn/Tablumps.hs
+++ b/src/Network/Damn/Tablumps.hs
@@ -12,12 +12,10 @@
 import Data.Attoparsec.ByteString hiding (word8)
 import qualified Data.Attoparsec.ByteString.Char8 as C
 import Data.ByteString (ByteString)
-import Data.Either.Compat
-import Data.Monoid.Compat
+import Data.Monoid
 import Data.Text (Text)
 import Data.Text.Encoding
 import Network.Damn.Tablumps.TH
-import Prelude.Compat
 import qualified Text.HTMLEntity as HE
 
 tablumpP :: Parser [Either ByteString Lump]
diff --git a/src/Network/Damn/Tablumps/TH.hs b/src/Network/Damn/Tablumps/TH.hs
--- a/src/Network/Damn/Tablumps/TH.hs
+++ b/src/Network/Damn/Tablumps/TH.hs
@@ -6,7 +6,6 @@
 import qualified Data.Attoparsec.ByteString.Char8 as C
 import Data.ByteString (ByteString)
 import Language.Haskell.TH
-import Prelude.Compat
 
 ary :: Int -> String -> Name -> ExpQ
 ary n s con =