Phantom fixes

IntersectMBO · Nov 29, 2022 · bcea2ac · bcea2ac
1 parent 5d12a71
commit bcea2ac
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 3 deletions.
diff --git a/cardano-node/src/Cardano/Node/Tracing/DefaultTraceConfig.hs b/cardano-node/src/Cardano/Node/Tracing/DefaultTraceConfig.hs
@@ -12,7 +12,7 @@ defaultCardanoConfig :: TraceConfig
 defaultCardanoConfig = emptyTraceConfig {
   tcOptions = Map.fromList
     [([],
-         [ ConfSeverity (SeverityF (Just Silence))
+         [ ConfSeverity (SeverityF Nothing) -- Means Silence
          , ConfDetail DNormal
          , ConfBackend  [Stdout MachineFormat
                         , EKGBackend

diff --git a/trace-dispatcher/test/Cardano/Logging/Test/Types.hs b/trace-dispatcher/test/Cardano/Logging/Test/Types.hs
@@ -83,15 +83,13 @@ instance MetaTrace Message where
                   , Namespace ["Test","Message2"]
                   , Namespace ["Test","Message3"]]
 
-
 instance Arbitrary Message where
   arbitrary = oneof
     [ Message1 0 <$> arbitrary,
       Message2 0 <$> elements ["Hallo", "Goodbye", "Whatelse"],
       Message3 0 <$> arbitrary
     ]
 
-
 -- | Adds a time between 0 and 1.
 --   0 is the time of the test start, and 1 the test end
 data ScriptedMessage = ScriptedMessage Double Message