Fix typo in ToObject ShelleyUtxowPredFailure

IntersectMBO · Apr 29, 2024 · f43d0df · f43d0df
1 parent f358d21
commit f43d0df
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/cardano-node/src/Cardano/Tracing/OrphanInstances/Shelley.hs b/cardano-node/src/Cardano/Tracing/OrphanInstances/Shelley.hs
@@ -476,7 +476,7 @@ instance
   , Core.Crypto (Ledger.EraCrypto ledgerera)
   ) => ToObject (ShelleyUtxowPredFailure ledgerera) where
   toObject _verb (ExtraneousScriptWitnessesUTXOW extraneousScripts) =
-    mconcat [ "kind" .= String "InvalidWitnessesUTXOW"
+    mconcat [ "kind" .= String "ExtraneousScriptWitnessesUTXOW"
              , "extraneousScripts" .= Set.map renderScriptHash extraneousScripts
              ]
   toObject _verb (InvalidWitnessesUTXOW wits') =