fixup! rename responseTo -> requestID to avoid partial record accessors

2020-06-08 23:18:12 +02:00 · 2020-06-08 23:18:12 +02:00 · 67cba1b69b
parent 4e359775ec
commit 67cba1b69b
1 changed files with 1 additions and 1 deletions
--- a/src/Hash2Pub/ProtocolTypes.hs
+++ b/src/Hash2Pub/ProtocolTypes.hs
@ -30,7 +30,7 @@ data FediChordMessage = Request
    , payload     :: Maybe ActionPayload
    }
    | Response
-    { requestID  :: Integer
+    { requestID   :: Integer
    , senderID    :: NodeID
    , part        :: Integer
    , isFinalPart :: Bool