ipv6 network tracing adaptions

IntersectMBO · Nov 23, 2021 · b0b4b3d · b0b4b3d
1 parent 325ddec
commit b0b4b3d
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/cardano-node/src/Cardano/Tracing/OrphanInstances/Network.hs b/cardano-node/src/Cardano/Tracing/OrphanInstances/Network.hs
@@ -1924,6 +1924,10 @@ instance ToObject NtN.RemoteAddress where
         mkObject [ "path" .= show path ]
 
 
+instance ToJSON IP.IP where
+    toJSON ip = Aeson.object ["ip" .= show ip]
+
+
 instance ToObject NtN.RemoteConnectionId where
     toObject verb (NtN.ConnectionId l r) =
         mkObject [ "local" .= toObject verb l