WIP

Author: geo2a

cardano-node/src/Cardano/Node/Configuration/TopologyP2P.hs

@@ -101,11 +101,11 @@ readTopologyFile
 
   -- make all relative paths in the topology file relative to the topology file location
   adjustFilePaths (takeDirectory topologyFilePath </>) <$>
-    if isGenesisCompatible ncConsensusMode ntUseBootstrapPeers
+    if isGenesisCompatible ncConsensusMode extraConfig
        then pure topology
        else do
          liftIO $ CT.traceWith tracer $ NetworkConfigUpdateWarning genesisIncompatible
-         pure $ topology{ntUseBootstrapPeers = DontUseBootstrapPeers}
+         pure $ topology{extraConfig = DontUseBootstrapPeers}
   where
     createMsg msg =
       "Cardano.Node.Configuration.Topology.readTopologyFile: " <> msg