Address PR review comments

cardano-scaling · Oct 10, 2024 · 463fd6f · 463fd6f
1 parent 0a36f5b
commit 463fd6f
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/hydra-cardano-api/src/Cardano/Api/UTxO.hs b/hydra-cardano-api/src/Cardano/Api/UTxO.hs
@@ -62,11 +62,11 @@ resolve k = Map.lookup k . toMap
 pairs :: UTxO' out -> [(TxIn, out)]
 pairs = Map.toList . toMap
 
--- | Find first 'UTxO' which satisfies given predicate.
+-- | Find first 'UTxO' using the output in predicate.
 find :: (out -> Bool) -> UTxO' out -> Maybe (TxIn, out)
-find fn utxo = List.find (fn . snd) $ pairs utxo
+find fn = findBy (fn . snd)
 
--- | Find first 'UTxO' which satisfies given predicate.
+-- | Find first 'UTxO' using both input and output in predicate.
 findBy :: ((TxIn, out) -> Bool) -> UTxO' out -> Maybe (TxIn, out)
 findBy fn utxo = List.find fn $ pairs utxo
 

diff --git a/hydra-node/json-schemas/logs.yaml b/hydra-node/json-schemas/logs.yaml
@@ -2073,7 +2073,7 @@ definitions:
           headId:
             $ref: "api.yaml#/components/schemas/HeadId"
           recoveredTxId:
-            sype: string
+            type: string
       - title: OnIncrementTx
         type: object
         additionalProperties: false