diff --git a/exon.cabal b/exon.cabal
--- a/exon.cabal
+++ b/exon.cabal
@@ -1,11 +1,11 @@
 cabal-version: 2.2
 
--- This file has been generated from package.yaml by hpack version 0.34.7.
+-- This file has been generated from package.yaml by hpack version 0.35.0.
 --
 -- see: https://github.com/sol/hpack
 
 name:           exon
-version:        1.2.0.0
+version:        1.3.0.0
 synopsis:       Customizable Quasiquote Interpolation
 description:    See https://hackage.haskell.org/package/exon/docs/Exon.html
 category:       String
@@ -106,12 +106,11 @@
   ghc-options: -Wall -Wredundant-constraints -Wincomplete-uni-patterns -Wmissing-deriving-strategies -Widentities -Wunused-packages
   build-depends:
       base >=4.12 && <5
-    , flatparse >=0.3.5.1
-    , generics-sop >=0.5.1.1
-    , ghc-hs-meta >=0.1
-    , incipit-base >=0.2
+    , flatparse >=0.3.5.1 && <0.4
+    , generics-sop >=0.5.1.1 && <0.6
+    , ghc-hs-meta ==0.1.*
+    , incipit-base ==0.5.*
     , template-haskell
-    , type-errors-pretty >=0.0.1.1
   mixins:
       base hiding (Prelude)
     , incipit-base (IncipitBase as Prelude)
@@ -197,7 +196,7 @@
       base >=4.12 && <5
     , exon
     , hedgehog
-    , incipit-base >=0.2
+    , incipit-base ==0.5.*
     , tasty
     , tasty-hedgehog
     , template-haskell
@@ -279,7 +278,7 @@
       base >=4.12 && <5
     , criterion
     , exon
-    , incipit-base >=0.2
+    , incipit-base ==0.5.*
   mixins:
       base hiding (Prelude)
     , incipit-base (IncipitBase as Prelude)
diff --git a/lib/Exon/Class/Exon.hs b/lib/Exon/Class/Exon.hs
--- a/lib/Exon/Class/Exon.hs
+++ b/lib/Exon/Class/Exon.hs
@@ -5,7 +5,6 @@
 import Data.ByteString.Builder (toLazyByteString)
 import qualified Data.Text.Lazy.Builder as Text
 import Data.Text.Lazy.Builder (toLazyText)
-import Text.Show (showString)
 
 import Exon.Class.Newtype (OverNewtypes, overNewtypes)
 import Exon.Data.Result (Result (Empty, Result))
@@ -195,12 +194,14 @@
   --
   -- @since 1.1.0.0
   exonConcat :: NonEmpty (Result builder) -> Result builder
-  exonConcat =
-    foldl1 \case
-      Empty -> id
-      Result z -> \case
-        Empty -> Result z
-        Result a -> exonAppend @result @builder z a
+  exonConcat (h :| t) =
+    foldl folder h t
+    where
+      folder = \case
+        Empty -> id
+        Result z -> \case
+          Empty -> Result z
+          Result a -> exonAppend @result @builder z a
   {-# inline exonConcat #-}
 
 instance {-# overlappable #-} (
diff --git a/lib/Exon/Class/ToSegment.hs b/lib/Exon/Class/ToSegment.hs
--- a/lib/Exon/Class/ToSegment.hs
+++ b/lib/Exon/Class/ToSegment.hs
@@ -4,9 +4,8 @@
 module Exon.Class.ToSegment where
 
 import GHC.TypeLits (ErrorMessage)
-import Generics.SOP (SOP (SOP), unZ, I (I), NP ((:*), Nil))
+import Generics.SOP (I (I), NP (Nil, (:*)), SOP (SOP), unZ)
 import Generics.SOP.GGP (GCode, GFrom, gfrom)
-import Type.Errors.Pretty (type (%), type (<>))
 
 import Exon.Generic (IsNewtype)
 
diff --git a/lib/Exon/SkipWs.hs b/lib/Exon/SkipWs.hs
--- a/lib/Exon/SkipWs.hs
+++ b/lib/Exon/SkipWs.hs
@@ -32,7 +32,7 @@
     Empty
   {-# inline exonWhitespace #-}
 
--- |A variant of 'exon' that ignores all literal whitespace in the quote (not in interpolated expressions).
+-- |A variant of 'Exon.exon' that ignores all literal whitespace in the quote (not in interpolated expressions).
 --
 -- > [intron|x|] === skipWs [exonws|x|]
 --
diff --git a/test/Exon/Test/ShowsPrecTest.hs b/test/Exon/Test/ShowsPrecTest.hs
--- a/test/Exon/Test/ShowsPrecTest.hs
+++ b/test/Exon/Test/ShowsPrecTest.hs
@@ -1,7 +1,6 @@
 module Exon.Test.ShowsPrecTest where
 
 import Hedgehog (TestT, (===))
-import Text.Show (showParen, showsPrec)
 
 import Exon.Quote (exon)