From 7c2d476259362d8345d29ebbcb6947ffe09d9067 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?J=C3=BCrgen=20Nicklisch-Franken?= Date: Thu, 12 Sep 2024 17:44:01 +0200 Subject: [PATCH] Fix IgnoreBlockOlderThanK bug --- cardano-node/src/Cardano/Node/Tracing/Tracers/ChainDB.hs | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/cardano-node/src/Cardano/Node/Tracing/Tracers/ChainDB.hs b/cardano-node/src/Cardano/Node/Tracing/Tracers/ChainDB.hs index 791b3538566..4c128be8083 100644 --- a/cardano-node/src/Cardano/Node/Tracing/Tracers/ChainDB.hs +++ b/cardano-node/src/Cardano/Node/Tracing/Tracers/ChainDB.hs @@ -353,9 +353,7 @@ instance MetaTrace (ChainDB.TraceEvent blk) where documentFor _ = Nothing allNamespaces = - Namespace [] ["IgnoreBlockOlderThanK"] - - : (map (nsPrependInner "AddBlockEvent") + map (nsPrependInner "AddBlockEvent") (allNamespaces :: [Namespace (ChainDB.TraceAddBlockEvent blk)]) ++ map (nsPrependInner "FollowerEvent") (allNamespaces :: [Namespace (ChainDB.TraceFollowerEvent blk)]) @@ -377,7 +375,6 @@ instance MetaTrace (ChainDB.TraceEvent blk) where (allNamespaces :: [Namespace (ImmDB.TraceEvent blk)]) ++ map (nsPrependInner "VolatileDbEvent") (allNamespaces :: [Namespace (VolDB.TraceEvent blk)]) - ) --------------------------------------------------------------------------------