unversionedProtocolCodec simplified.

input-output-hk · Jan 13, 2022 · 297cd9d · 297cd9d
1 parent b50b215
commit 297cd9d
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 6 deletions.
diff --git a/src/System/Metrics/Network/Acceptor.hs b/src/System/Metrics/Network/Acceptor.hs
@@ -33,8 +33,7 @@ import           Ouroboros.Network.Socket (AcceptedConnectionsLimit (..),
                                            SomeResponderApplication (..),
                                            cleanNetworkMutableState, newNetworkMutableState,
                                            nullNetworkServerTracers, withServerNode)
-import           Ouroboros.Network.Protocol.Handshake.Codec (cborTermVersionDataCodec,
-                                                             noTimeLimitsHandshake,
+import           Ouroboros.Network.Protocol.Handshake.Codec (noTimeLimitsHandshake,
                                                              timeLimitsHandshake)
 import           Ouroboros.Network.Protocol.Handshake.Type (Handshake)
 import           Ouroboros.Network.Protocol.Handshake.Unversioned (UnversionedProtocol (..),
@@ -86,7 +85,7 @@ doListenToForwarder snocket address timeLimits app = do
     address
     unversionedHandshakeCodec
     timeLimits
-    (cborTermVersionDataCodec unversionedProtocolDataCodec)
+    unversionedProtocolDataCodec
     acceptableVersion
     (simpleSingletonVersions
       UnversionedProtocol

diff --git a/src/System/Metrics/Network/Forwarder.hs b/src/System/Metrics/Network/Forwarder.hs
@@ -21,8 +21,7 @@ import           Ouroboros.Network.Mux (MiniProtocol (..), MiniProtocolLimits (.
                                         OuroborosApplication (..), MuxPeer (..),
                                         RunMiniProtocol (..),
                                         miniProtocolLimits, miniProtocolNum, miniProtocolRun)
-import           Ouroboros.Network.Protocol.Handshake.Codec (cborTermVersionDataCodec,
-                                                             noTimeLimitsHandshake,
+import           Ouroboros.Network.Protocol.Handshake.Codec (noTimeLimitsHandshake,
                                                              timeLimitsHandshake)
 import           Ouroboros.Network.Protocol.Handshake.Type (Handshake)
 import           Ouroboros.Network.Protocol.Handshake.Unversioned (UnversionedProtocol (..),
@@ -67,7 +66,7 @@ doConnectToAcceptor snocket address timeLimits app =
     snocket
     unversionedHandshakeCodec
     timeLimits
-    (cborTermVersionDataCodec unversionedProtocolDataCodec)
+    unversionedProtocolDataCodec
     nullNetworkConnectTracers
     acceptableVersion
     (simpleSingletonVersions