From 3c2e8fc99487d9842695548a6c94c1c42709c7d0 Mon Sep 17 00:00:00 2001
From: Rene Vergara <rene@vergara.network>
Date: Fri, 5 Apr 2024 12:47:17 -0500
Subject: [PATCH] Fix `TxIn` parsing

---
 CHANGELOG.md              | 6 ++++++
 src/ZcashHaskell/Types.hs | 2 +-
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index 2f357bb..39c8d2a 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -5,6 +5,12 @@ All notable changes to this project will be documented in this file.
 The format is based on [Keep a Changelog](https://keepachangelog.com/en/1.0.0/),
 and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0.html).
 
+## [0.5.3.0]
+
+### Fixed
+
+- Parsing of `TxIn` for FFI
+
 ## [0.5.2.0]
 
 ### Added
diff --git a/src/ZcashHaskell/Types.hs b/src/ZcashHaskell/Types.hs
index a00b8d2..f2c5359 100644
--- a/src/ZcashHaskell/Types.hs
+++ b/src/ZcashHaskell/Types.hs
@@ -160,7 +160,7 @@ fromRawTxIn t = H.TxIn op (rti_script t) (rti_seq t)
         then H.nullOutPoint
         else H.OutPoint
                ((fromJust .
-                 H.hexToTxHash . E.decodeUtf8Lenient . rop_hash . rti_outpoint)
+                 H.hexToTxHash . toText . hexString . rop_hash . rti_outpoint)
                   t)
                (rop_n $ rti_outpoint t)