summaryrefslogtreecommitdiff
path: root/Presence
diff options
context:
space:
mode:
authorjoe <joe@jerkface.net>2017-11-13 18:15:36 -0500
committerjoe <joe@jerkface.net>2017-11-13 18:15:36 -0500
commitf4c8d11fdf0210d4ed1427a62e920b429cd23a12 (patch)
tree069168612461e6830c498d272d1fa9c7982ea4ad /Presence
parent2d2a7d8fc074a2ea8442534cab78481a70b43781 (diff)
Minor edit.
Diffstat (limited to 'Presence')
-rw-r--r--Presence/Presence.hs4
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
145 , remotesByPeer :: TVar (Map ConnectionKey 145 , remotesByPeer :: TVar (Map ConnectionKey
146 (Map UserName 146 (Map UserName
147 RemotePresence)) 147 RemotePresence))
148 , associatedPeers :: TVar (Map SockAddr ()) 148 , -- | These are the remote peers we are seeking to obtain a connection to.
149 -- See 'rosterGetStuff'.
150 associatedPeers :: TVar (Map SockAddr ())
149 , server :: TMVar XMPPServer 151 , server :: TMVar XMPPServer
150 , keyToChan :: TVar (Map ConnectionKey Conn) 152 , keyToChan :: TVar (Map ConnectionKey Conn)
151 , consoleWriter :: Maybe ConsoleWriter 153 , consoleWriter :: Maybe ConsoleWriter