dandri/simplexmq
1
0
Fork 0
mirror of https://github.com/simplex-chat/simplexmq.git synced 2026-05-22 12:45:28 +00:00
Code Issues Packages Projects Releases Wiki Activity

delete contact connection with DEL command (#218)

Browse Source
This commit is contained in:
Evgeny Poberezkin
2021-12-07 19:05:19 +00:00
committed by GitHub
parent 218a7756f8
commit fe2d6607de
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Simplex/Messaging/Agent.hs
+2 -1
View File
@@ -496,7 +496,8 @@ deleteConnection' c connId =
withStore (`getConn` connId) >>= \case
SomeConn _ (DuplexConnection _ rq _) -> delete rq
SomeConn _ (RcvConnection _ rq) -> delete rq
_ -> withStore (`deleteConn` connId)
SomeConn _ (ContactConnection _ rq) -> delete rq
SomeConn _ (SndConnection _ _) -> withStore (`deleteConn` connId)
where
delete :: RcvQueue -> m ()
delete rq = do