From 14d245ee6b5d3f1e51d5455c2c1b055087b99485 Mon Sep 17 00:00:00 2001 From: joe Date: Sun, 27 May 2018 17:17:18 -0400 Subject: Comments. --- src/Network/Tox/ContactInfo.hs | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'src/Network/Tox/ContactInfo.hs') diff --git a/src/Network/Tox/ContactInfo.hs b/src/Network/Tox/ContactInfo.hs index 6cadc944..d03fb249 100644 --- a/src/Network/Tox/ContactInfo.hs +++ b/src/Network/Tox/ContactInfo.hs @@ -32,6 +32,10 @@ data Contact = Contact { contactKeyPacket :: Maybe (DHT.DHTPublicKey) , contactFriendRequest :: Maybe (DHT.FriendRequest) , contactPolicy :: Maybe (Connection.Policy) + -- Possible semantics + -- RefusingToConnect : rejected friend-request or blocked. + -- OpenToConnect : pending friend-request. + -- TryingToConnect : roster entry. } nullContact :: Contact -- cgit v1.2.3