Cardano: use the right genesis configs for the shape

Unrelated to this PR, but spotted during review. This was forgotten in #2679.
IntersectMBO · Nov 13, 2020 · 05e79a5 · 05e79a5
1 parent 214c605
commit 05e79a5
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/ouroboros-consensus-cardano/src/Ouroboros/Consensus/Cardano/Node.hs b/ouroboros-consensus-cardano/src/Ouroboros/Consensus/Cardano/Node.hs
@@ -516,8 +516,8 @@ protocolInfoCardano protocolParamsByron@ProtocolParamsByron {
  shape = History.Shape $ Exactly $
  K (Byron.byronEraParams genesisByron)
  :* K (Shelley.shelleyEraParams genesisShelley)
- :* K (Shelley.shelleyEraParams genesisShelley)
- :* K (Shelley.shelleyEraParams genesisShelley)
+ :* K (Shelley.shelleyEraParams genesisAllegra)
+ :* K (Shelley.shelleyEraParams genesisMary)
  :* Nil
 
  cfg :: TopLevelConfig (CardanoBlock c)