store timing config in the proposal datum

.... and mock the value upon creation for now
This commit is contained in:
fanghr 2022-05-18 20:34:56 +08:00
parent cf51d47a0d
commit 92c64f8d7a
No known key found for this signature in database
GPG key ID: 35CD9A71CD5D5870
8 changed files with 68 additions and 2 deletions

View file

@ -36,6 +36,7 @@ module Sample.Shared (
proposalPolicySymbol,
proposalValidatorHash,
proposalValidatorAddress,
proposalTimingConfig,
-- ** Authority
authorityToken,
@ -74,6 +75,9 @@ import Agora.Proposal (
Proposal (..),
ProposalThresholds (..),
)
import Agora.Proposal.Time (
ProposalTimingConfig (..),
)
import Agora.Stake (Stake (..))
import Agora.Treasury (treasuryValidator)
import Agora.Utils (validatorHashToTokenName)
@ -184,6 +188,15 @@ authorityToken = authorityTokenFromGovernor governor
authorityTokenSymbol :: CurrencySymbol
authorityTokenSymbol = authorityTokenSymbolFromGovernor governor
proposalTimingConfig :: ProposalTimingConfig
proposalTimingConfig =
ProposalTimingConfig
{ draftTime = 0
, votingTime = 1000
, lockingTime = 2000
, executingTime = 3000
}
------------------------------------------------------------------
treasuryOut :: TxOut