set different default server (#107)

* set different default server

* remove comment
This commit is contained in:
Evgeny Poberezkin
2021-04-26 20:18:20 +01:00
committed by GitHub
parent 5fec6c1755
commit 816703527a
2 changed files with 3 additions and 3 deletions
-1
View File
@@ -255,7 +255,6 @@ processSMPTransmission c@AgentClient {sndQ} st (srv, rId, cmd) = do
withStore $ setRcvQueueActive st rq verifyKey
REPLY qInfo -> do
logServer "<--" c srv rId "MSG <REPLY>"
-- TODO move senderKey inside SndQueue
(sq, senderKey, verifyKey) <- newSendQueue qInfo connAlias
withStore $ upgradeRcvConnToDuplex st connAlias sq
connectToSendQueue c st sq senderKey verifyKey