diff --git a/src/Servant/Client/Internal/JSaddleXhrClient.hs b/src/Servant/Client/Internal/JSaddleXhrClient.hs
index e219ff2..710ed52 100644
--- a/src/Servant/Client/Internal/JSaddleXhrClient.hs
+++ b/src/Servant/Client/Internal/JSaddleXhrClient.hs
@@ -282,7 +282,7 @@ toResponse domc xhr = do
     _ -> inDom $ do
       statusText <- BS.pack <$> JS.getStatusText xhr
       headers <- parseHeaders <$> JS.getAllResponseHeaders xhr
-      responseText <- maybe "" (L.fromStrict . BS.pack) <$> JS.getResponseText xhr -- FIXME: Text/Binary? Performance? Test?
+      responseText <- maybe "" (L.fromStrict . T.encodeUtf8) <$> JS.getResponseText xhr
       pure Response
         { responseStatusCode  = mkStatus (fromIntegral status) statusText
         , responseBody        = responseText