diff --git a/Source/Library/Data/Text/ICU/Normalized/NFC.hs b/Source/Library/Data/Text/ICU/Normalized/NFC.hs
--- a/Source/Library/Data/Text/ICU/Normalized/NFC.hs
+++ b/Source/Library/Data/Text/ICU/Normalized/NFC.hs
@@ -23,7 +23,8 @@
     lazy,
     lower,
     upper,
-    utf8
+    utf8,
+    utf8ByteString
     ) where
 
 import qualified Data.Text.ICU as ICU
@@ -39,6 +40,7 @@
 import Data.Data
 import Data.Typeable
 import Control.Lens hiding (strict, lazy)
+import Data.ByteString (ByteString)
 
 -- | An NFC-normalized Data.Text
 newtype NFCText = NFCText Text deriving (Show, Generic, Data, Typeable)
@@ -52,9 +54,13 @@
 lazy ∷ Prism' NFCText LT.Text
 lazy = prism' (review strict ∘ LT.toStrict) (\t → LT.fromStrict <$> preview _NFCText t)
 
+-- | Prism between 'NFCText' and a utf-8 encoded 'ByteString
+utf8ByteString ∷ Prism' NFCText ByteString
+utf8ByteString = prism' (NFCText ∘ decodeUtf8) (Just ∘ encodeUtf8 ∘ view _NFCText)
+
 -- | Prism between 'NFCText' and a utf-8 encoded 'String'
 utf8 :: Prism' NFCText String
-utf8 = prism' (fromString) (Just ∘ C8.unpack ∘ encodeUtf8 ∘ view _NFCText)
+utf8 = prism' (fromString) (Just ∘ C8.unpack ∘ view utf8ByteString)
 
 -- | Convert 'NFCText' to lower case.
 lower :: Getter NFCText NFCText
diff --git a/text-icu-normalized.cabal b/text-icu-normalized.cabal
--- a/text-icu-normalized.cabal
+++ b/text-icu-normalized.cabal
@@ -2,7 +2,7 @@
 -- documentation, see http://haskell.org/cabal/users-guide/
 
 name:                text-icu-normalized
-version:             0.1.4.1
+version:             0.1.5.1
 synopsis:            Dealing with Strict Text in NFC normalization.
 description:         Handle Text in NFC normalization.
 homepage:            https://gitlab.com/theunixman/text-icu-normalized