diff --git a/box.cabal b/box.cabal
--- a/box.cabal
+++ b/box.cabal
@@ -1,6 +1,6 @@
 cabal-version: 3.0
 name: box
-version: 0.9.3.0
+version: 0.9.3.1
 license: BSD-3-Clause
 license-file: LICENSE
 copyright: Tony Day (c) 2017
@@ -13,7 +13,7 @@
 description:
     This might be a profunctor effect system, but unlike all the others. See the project readme.org for usage and discussion: https://github.com/tonyday567/box#readme.org
 build-type: Simple
-tested-with: GHC ==8.10.7 || ==9.4.7 || ==9.6.3 || ==9.8.1
+tested-with: GHC ==8.10.7 || ==9.2.7 || ==9.4.7 || ==9.6.3 || ==9.8.1
 extra-doc-files:
     ChangeLog.md
     readme.org
diff --git a/readme.org b/readme.org
--- a/readme.org
+++ b/readme.org
@@ -11,16 +11,12 @@
 * Usage
 
 #+begin_src haskell
-:set prompt "> "
 :set -XOverloadedStrings
 import Box
 import Prelude
 import Data.Function
 import Data.Bool
 #+end_src
-
-#+RESULTS:
-: >
 
 Standard IO echoing:
 
diff --git a/src/Box/IO.hs b/src/Box/IO.hs
--- a/src/Box/IO.hs
+++ b/src/Box/IO.hs
@@ -177,11 +177,11 @@
 
 -- | Convert a 'Box' from ByteString to lines of Text.
 toLineBox :: Text -> Box IO ByteString ByteString -> CoBox IO Text Text
-toLineBox end (Box c e) = Box (contramap (encodeUtf8 . (<> end)) c) <$> evalEmitter [] (unlistE $ fmap (Text.lines . decodeUtf8Lenient) e)
+toLineBox end (Box c e) = Box (contramap (encodeUtf8 . (<> end)) c) <$> evalEmitter [] (unlistE $ fmap (Text.lines . decodeUtf8) e)
 
 -- | Convert a 'Box' from lines of Text to ByteStrings.
 fromLineBox :: Text -> Box IO Text Text -> Box IO ByteString ByteString
-fromLineBox end (Box c e) = Box (contramap (Text.lines . decodeUtf8Lenient) (listC c)) (fmap (encodeUtf8 . (<> end)) e)
+fromLineBox end (Box c e) = Box (contramap (Text.lines . decodeUtf8) (listC c)) (fmap (encodeUtf8 . (<> end)) e)
 
 -- | Commit to an IORef
 --
