add CRContactConnecting api response (#281)

This commit is contained in:
Efim Poberezkin
2022-02-08 13:04:17 +04:00
committed by GitHub
parent 82d02e923a
commit 855881094b
4 changed files with 11 additions and 8 deletions

View File

@@ -89,6 +89,7 @@ responseToView cmd = \case
CRSndFileCancelled ft -> sendingFile_ "cancelled" ft
CRSndFileRcvCancelled ft@SndFileTransfer {recipientDisplayName = c} ->
[ttyContact c <> " cancelled receiving " <> sndFile ft]
CRContactConnecting _ -> []
CRContactConnected ct -> [ttyFullContact ct <> ": contact is connected"]
CRContactAnotherClient c -> [ttyContact' c <> ": contact is connected to another client"]
CRContactDisconnected c -> [ttyContact' c <> ": disconnected from server (messages will be queued)"]