Merge branch 'dshuiski/1599-blockfrost-get-utxo' into dshuiski/balanc…

…er-constraints
Plutonomicon · Jan 9, 2025 · a1986f1 · a1986f1
2 parents 355e70d + 1d98478
commit a1986f1
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Internal/Service/Blockfrost.purs b/src/Internal/Service/Blockfrost.purs
@@ -1196,7 +1196,7 @@ instance DecodeAeson BlockfrostUtxosOfTransaction where
       -> Either JsonDecodeError (Maybe BlockfrostUnspentOutput)
     decodeUtxoEntry txHash utxoAeson = do
       (consumedByTx :: Maybe String) <- aesonObject
-        (flip getFieldOptional "consumed_by_tx")
+        (flip getFieldOptional' "consumed_by_tx")
         utxoAeson
       case consumedByTx of
         Nothing ->