reference input witness count fix

cardano-foundation · Sep 14, 2023 · f9d6853 · f9d6853
1 parent a31fa73
commit f9d6853
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/lib/wallet/src/Cardano/Wallet/Write/Tx/Sign.hs b/lib/wallet/src/Cardano/Wallet/Write/Tx/Sign.hs
@@ -196,6 +196,7 @@ estimateKeyWitnessCount utxo txbody@(Cardano.TxBody txbodycontent) =
         txRefInpsWit =
             case Cardano.txInsReference txbodycontent of
                 Cardano.TxInsReferenceNone -> 0
+                Cardano.TxInsReference _ [] -> 0
                 Cardano.TxInsReference _ _ -> 1
         nonInputWits = numberOfShelleyWitnesses $ fromIntegral $
             length txExtraKeyWits' +