diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -9,3 +9,7 @@
 ## 0.1.0.0 - 2024-07-01
 
 First release!
+
+## 0.1.0.1 - 2024-08-10
+
+Fixing handling of non-ascii characters in ffprobe's output
diff --git a/haskell-ffprobe.cabal b/haskell-ffprobe.cabal
--- a/haskell-ffprobe.cabal
+++ b/haskell-ffprobe.cabal
@@ -5,9 +5,9 @@
 -- see: https://github.com/sol/hpack
 
 name:           haskell-ffprobe
-version:        0.1.0.0
+version:        0.1.0.1
 synopsis:       Haskell bindings for ffprobe
-description:    Please see the README on GitHub at <https://github.com/Arthi-chaud/haskell-ffprobe#readme>
+description:    Use ffprobe data in Haskell. Checkout the README on GitHub for an example.
 category:       Bindings
 homepage:       https://github.com/Arthi-chaud/haskell-ffprobe#readme
 bug-reports:    https://github.com/Arthi-chaud/haskell-ffprobe/issues
diff --git a/src/FFProbe.hs b/src/FFProbe.hs
--- a/src/FFProbe.hs
+++ b/src/FFProbe.hs
@@ -4,7 +4,8 @@
 ) where
 
 import Data.Aeson (FromJSON, eitherDecodeStrict)
-import Data.ByteString.Char8 (pack)
+import Data.Text (pack)
+import Data.Text.Encoding (encodeUtf8)
 import FFProbe.Data.Chapter (Chapter)
 import FFProbe.Data.Format (Format)
 import FFProbe.Data.Stream (Stream)
@@ -25,5 +26,5 @@
 ffprobe path = do
     probeRes <- execFFProbe path
     return $ case probeRes of
-        Right rawJson -> eitherDecodeStrict (pack rawJson)
+        Right rawJson -> eitherDecodeStrict (encodeUtf8 $ pack rawJson)
         Left err -> Left err
diff --git a/test/FFProbe/TestFFProbe.hs b/test/FFProbe/TestFFProbe.hs
--- a/test/FFProbe/TestFFProbe.hs
+++ b/test/FFProbe/TestFFProbe.hs
@@ -25,3 +25,10 @@
                 title (chapters ffprobeData !! 1) `shouldBe` Just "Middle"
                 title (chapters ffprobeData !! 2) `shouldBe` Just "End"
             )
+    it "Should Succeed at parsing unicode characters" $ do
+        res <- ffprobe "test/assets/test-unicode.mp4"
+        shouldBeRight
+            res
+            ( \ffprobeData -> do
+                title (head (chapters ffprobeData)) `shouldBe` Just "Début"
+            )
diff --git a/test/Utils.hs b/test/Utils.hs
--- a/test/Utils.hs
+++ b/test/Utils.hs
@@ -1,4 +1,4 @@
-module Utils where
+module Utils (getAssetContent, shouldBeRight) where
 
 import Data.ByteString
 import Test.Hspec.Expectations
