diff --git a/ouroboros-network/src/Ouroboros/Network/TxSubmission/Inbound/Server.hs b/ouroboros-network/src/Ouroboros/Network/TxSubmission/Inbound/Server.hs
index c26dd490fd..82fd9010a7 100644
--- a/ouroboros-network/src/Ouroboros/Network/TxSubmission/Inbound/Server.hs
+++ b/ouroboros-network/src/Ouroboros/Network/TxSubmission/Inbound/Server.hs
@@ -30,6 +30,7 @@ import Ouroboros.Network.TxSubmission.Inbound.Types
 data EnableNewTxSubmissionProtocol =
       EnableNewTxSubmissionProtocol
     | DisableNewTxSubmissionProtocol
+    deriving (Eq, Show)
 
 -- | A tx-submission outbound side (server, sic!).
 --