From 309dd06a2ecae03aaa7c4ed429884caec85273a7 Mon Sep 17 00:00:00 2001
From: Rene Vergara <rene@vergara.network>
Date: Tue, 6 Feb 2024 11:47:39 -0600
Subject: [PATCH] Correct `fromText`

---
 src/Data/HexString.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Data/HexString.hs b/src/Data/HexString.hs
index ef71b4b..79e3682 100644
--- a/src/Data/HexString.hs
+++ b/src/Data/HexString.hs
@@ -83,7 +83,7 @@ toBytes (HexString bs) = BS16.decodeLenient bs
 
 -- | Reads a human-readable hex string into a `HexString`
 fromText :: T.Text -> HexString
-fromText = hexString . TE.encodeUtf8
+fromText = hexString . BS16.decodeLenient . TE.encodeUtf8
 
 -- | Access to a 'T.Text' representation of the 'HexString'
 toText :: HexString -> T.Text