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

rename proposal redeemer Unlock to UnlockStake

Browse source
This commit is contained in:
Hongrui Fang 2022-10-24 18:14:58 +08:00
parent 85fa6c81da
commit cd3ccfe350
5 changed files with 11 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

4
agora-specs/Sample/Proposal/PrivilegeEscalate.hs
View file

@ -8,7 +8,7 @@ module Sample.Proposal.PrivilegeEscalate (
import Agora.Proposal (
ProposalDatum (..),
ProposalId (ProposalId),
ProposalRedeemer (Unlock, Vote),
ProposalRedeemer (UnlockStake, Vote),
ProposalStatus (VotingReady),
ProposalVotes (ProposalVotes),
ResultTag (ResultTag),
@ -102,7 +102,7 @@ mkProposalInputOutputDatum op =
in wrap op (,) proposal proposalWithVotes
mkProposalRedeemer :: Operation -> ProposalRedeemer
mkProposalRedeemer op = wrap op const (Vote defResultTag) Unlock
mkProposalRedeemer op = wrap op const (Vote defResultTag) UnlockStake
proposalRef :: TxOutRef
proposalRef = TxOutRef proposalTxRef 1