blade/simplex-chat
1
0
Fork 0
mirror of https://github.com/simplex-chat/simplex-chat.git synced 2024-12-17 17:20:21 +01:00
Code Issues Actions Packages Projects Releases Wiki Activity

core: auto-reply message for user contact addresses (#755)

Browse Source 
* core: auto-reply message for user contact addresses

* terminal: show auto accept status and message

* test
This commit is contained in:
Evgeny Poberezkin
2022-06-27 19:41:25 +01:00
committed by GitHub
parent 6d25991417
commit 41c9742b0d
12 changed files with 366 additions and 204 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Simplex/Chat/Bot.hs
+1 -1
View File
@@ -38,7 +38,7 @@ chatBotRepl welcome answer _user cc = do
initializeBotAddress :: ChatController -> IO ()
initializeBotAddress cc = do
sendChatCmd cc "/show_address" >>= \case
CRUserContactLink uri _ -> showBotAddress uri
CRUserContactLink uri _ _ -> showBotAddress uri
CRChatCmdError (ChatErrorStore SEUserContactLinkNotFound) -> do
putStrLn $ "No bot address, creating..."
sendChatCmd cc "/address" >>= \case