Sulkta-OSS/agora
3
0
Fork 0
Code Issues 1 Pull requests Projects Releases Packages Wiki Activity Actions

Merge pull request #220 from Liqwid-Labs/connor/export-alwaysSucceedsPolicy

Browse source 
Export `alwaysSucceedsPolicy` in the linker
This commit is contained in:
emiflake 2023-01-18 13:44:48 +01:00 • committed by GitHub
commit 684dc1a59e
1 changed files with 6 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

6
agora/Agora/Linker.hs
View file

@ -114,6 +114,11 @@ linker = do
, Tagged AuthorityTokenTag CurrencySymbol , Tagged AuthorityTokenTag CurrencySymbol
] ]
"agora:mutateGovernorValidator" "agora:mutateGovernorValidator"
alwaysSucceedsPolicy' <-
fetchTS
@MintingPolicyRole
@'[]
"agora:alwaysSucceedsPolicy"
governor <- getParam governor <- getParam
@ -180,6 +185,7 @@ linker = do
, ("agora:noOpValidator", toRoledScript noOpVal') , ("agora:noOpValidator", toRoledScript noOpVal')
, ("agora:treasuryWithdrawalValidator", toRoledScript treaWithdrawalVal') , ("agora:treasuryWithdrawalValidator", toRoledScript treaWithdrawalVal')
, ("agora:mutateGovernorValidator", toRoledScript mutateGovVal') , ("agora:mutateGovernorValidator", toRoledScript mutateGovVal')
, ("agora:alwaysSucceedsPolicy", toRoledScript alwaysSucceedsPolicy')
] ]
, information = , information =
AgoraScriptInfo AgoraScriptInfo