Skip to content

Commit

Permalink
Fix cardano-ledger-test failure
Browse files Browse the repository at this point in the history
  • Loading branch information
aniketd committed Aug 18, 2023
1 parent 999f54d commit a792415
Show file tree
Hide file tree
Showing 2 changed files with 2 additions and 3 deletions.
1 change: 0 additions & 1 deletion eras/conway/impl/src/Cardano/Ledger/Conway/Rules/Gov.hs
Original file line number Diff line number Diff line change
Expand Up @@ -181,7 +181,6 @@ govTransition ::
ConwayEraPParams era =>
TransitionRule (ConwayGOV era)
govTransition = do
-- TODO Check the signatures
TRC (GovEnv txid epoch, st, gp) <- judgmentContext

let applyProps st' Empty = pure st'
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -145,7 +145,7 @@ newConstitutionProposal :: forall era. Scriptic era => Proof era -> ProposalProc
newConstitutionProposal pf =
ProposalProcedure
(Coin proposalDeposit)
(RewardAcnt Mainnet (KeyHashObj (stakeKeyHash pf)))
(RewardAcnt Testnet (KeyHashObj (stakeKeyHash pf)))
(NewConstitution SNothing (proposedConstitution @era))
(Anchor (fromJust $ textToUrl "new.constitution.com") (SLE.mkDummySafeHash Proxy 1))

Expand All @@ -158,7 +158,7 @@ anotherConstitutionProposal ::
anotherConstitutionProposal pf prevGovActionId =
ProposalProcedure
(Coin proposalDeposit)
(RewardAcnt Mainnet (KeyHashObj (stakeKeyHash pf)))
(RewardAcnt Testnet (KeyHashObj (stakeKeyHash pf)))
( NewConstitution
(SJust (PrevGovActionId prevGovActionId))
(Constitution (SLE.mkDummyAnchor 2) SNothing)
Expand Down

0 comments on commit a792415

Please sign in to comment.