diff --git a/trace-dispatcher/src/Cardano/Logging/Trace.hs b/trace-dispatcher/src/Cardano/Logging/Trace.hs
index 110ec99d335..2c3fb3a0ced 100644
--- a/trace-dispatcher/src/Cardano/Logging/Trace.hs
+++ b/trace-dispatcher/src/Cardano/Logging/Trace.hs
@@ -181,7 +181,6 @@ withSeverity (Trace tr) = Trace $
         (lc, Left e) -> (lc, Left e))
       tr
   where
-    {-# INLINE process #-}
     process lc cont@(Right v) =
       if isJust (lcSeverity lc)
         then (lc,cont)
@@ -236,7 +235,6 @@ withPrivacy (Trace tr) = Trace $
         (lc, Left e) -> (lc, Left e))
       tr
   where
-    {-# INLINE process #-}
     process lc cont@(Right v) =
       if isJust (lcPrivacy lc)
         then (lc,cont)
@@ -268,7 +266,6 @@ withDetails (Trace tr) = Trace $
         (lc, Left e) -> (lc, Left e))
       tr
   where
-    {-# INLINE process #-}
     process lc cont@(Right v) =
       if isJust (lcDetails lc)
         then (lc,cont)
diff --git a/trace-dispatcher/src/Cardano/Logging/Types.hs b/trace-dispatcher/src/Cardano/Logging/Types.hs
index a5be95a4d61..6374b697a8b 100644
--- a/trace-dispatcher/src/Cardano/Logging/Types.hs
+++ b/trace-dispatcher/src/Cardano/Logging/Types.hs
@@ -53,7 +53,6 @@ module Cardano.Logging.Types (
 
 
 import           Codec.Serialise (Serialise (..))
--- import           Data.Aeson ((.=))
 import qualified Data.Aeson as AE
 import qualified Data.HashMap.Strict as HM
 import           Data.IORef
@@ -68,12 +67,9 @@ import           Network.HostName (HostName)
 
 import qualified Control.Tracer as T
 
---
-
 import           Ouroboros.Network.Util.ShowProxy (ShowProxy (..))
 
 
-
 -- | The Trace carries the underlying tracer Tracer from the contra-tracer package.
 --   It adds a 'LoggingContext' and maybe a 'TraceControl' to every message.
 newtype Trace m a = Trace