1 files changed, 3 insertions, 1 deletions

diff --git a/Presence/Presence.hs b/Presence/Presence.hs
index 9660b29f..d2a6b6eb 100644
--- a/Presence/Presence.hs
+++ b/Presence/Presence.hs
@@ -145,7 +145,9 @@ data PresenceState = PresenceState
     , remotesByPeer :: TVar (Map ConnectionKey
                                  (Map UserName
                                       RemotePresence))
-    , associatedPeers :: TVar (Map SockAddr ())
+    , -- | These are the remote peers we are seeking to obtain a connection to.
+      -- See 'rosterGetStuff'.
+      associatedPeers :: TVar (Map SockAddr ())
     , server :: TMVar XMPPServer
     , keyToChan :: TVar (Map ConnectionKey Conn)
     , consoleWriter :: Maybe ConsoleWriter