diff --git a/src/Simplex/Messaging/Agent/Protocol.hs b/src/Simplex/Messaging/Agent/Protocol.hs index b553ca9bb..39bae0a24 100644 --- a/src/Simplex/Messaging/Agent/Protocol.hs +++ b/src/Simplex/Messaging/Agent/Protocol.hs @@ -272,7 +272,7 @@ data ACommand (p :: AParty) where SWCH :: ACommand Client OFF :: ACommand Client DEL :: ACommand Client - DEL_RCVQ :: SMPServer -> SMP.SenderId -> Maybe AgentErrorType -> ACommand Agent + DEL_RCVQ :: SMPServer -> SMP.RecipientId -> Maybe AgentErrorType -> ACommand Agent DEL_CONN :: ACommand Agent DEL_USER :: Int64 -> ACommand Agent CHK :: ACommand Client