@@ -85,7 +85,7 @@ clone = js_clone
86fromByteString :: ByteString -> GHCJSPure (Buffer, Int, Int)
86fromByteString :: ByteString -> GHCJSPure (Buffer, Int, Int)
87fromByteString bs = GHCJSPure $ do
87fromByteString bs = GHCJSPure $ do
88− buffer <- SomeBuffer <$> jsg1 "h$newByteArrayBase64String" (decodeUtf8 $ B64.encode bs)
88+ buffer <- SomeBuffer <$> jsg1 "h$newByteArrayFromBase64String" (decodeUtf8 $ B64.encode bs)
89 return (buffer, 0, BS.length bs)
89 return (buffer, 0, BS.length bs)
90{-# INLINE fromByteString #-}
90{-# INLINE fromByteString #-}