Expose convertToNewScriptWitness

Jimbo4350 · Jimbo4350 · commit 32b84666dbb9 · 2025-12-05T11:06:45.000-04:00
diff --git a/cardano-api/src/Cardano/Api/Experimental/Plutus.hs b/cardano-api/src/Cardano/Api/Experimental/Plutus.hs
@@ -3,6 +3,7 @@ module Cardano.Api.Experimental.Plutus
     PlutusScriptInEra (..)
 
     -- * Legacy Scripts
+  , convertToNewScriptWitness
   , legacyWitnessToScriptRequirements
   , legacyWitnessConversion
   , toPlutusSLanguage
diff --git a/cardano-api/src/Cardano/Api/Experimental/Plutus/Internal/Shim/LegacyScripts.hs b/cardano-api/src/Cardano/Api/Experimental/Plutus/Internal/Shim/LegacyScripts.hs
@@ -11,7 +11,8 @@
 {-# LANGUAGE TypeFamilyDependencies #-}
 
 module Cardano.Api.Experimental.Plutus.Internal.Shim.LegacyScripts
-  ( legacyWitnessToScriptRequirements
+  ( convertToNewScriptWitness
+  , legacyWitnessToScriptRequirements
   , legacyWitnessConversion
   , toPlutusSLanguage
   )

Original file line number	Diff line number	Diff line change
`@@ -11,7 +11,8 @@`
`11`	`11`	`{-# LANGUAGE TypeFamilyDependencies #-}`
`12`	`12`
`13`	`13`	`module Cardano.Api.Experimental.Plutus.Internal.Shim.LegacyScripts`
`14`		`- ( legacyWitnessToScriptRequirements`
	`14`	`+ ( convertToNewScriptWitness`
	`15`	`+ , legacyWitnessToScriptRequirements`
`15`	`16`	`, legacyWitnessConversion`
`16`	`17`	`, toPlutusSLanguage`
`17`	`18`	`)`