android-apps-mirrors/SimpleX-Chat
0
0
Fork 0
mirror of https://github.com/simplex-chat/simplex-chat.git synced 2025-06-28 20:29:53 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

core: multi forward api (#4704)

Browse source
This commit is contained in:
spaced4ndy 2024-08-22 21:36:35 +04:00 • committed by GitHub
parent c485837910
commit 791489e943
No known key found for this signature in database
GPG key ID: B5690EEEBB952194
21 changed files with 601 additions and 343 deletions
Download patch file Download diff file Expand all files Collapse all files

2
apps/simplex-bot-advanced/Main.hs
View file

@ -46,7 +46,7 @@ mySquaringBot _user cc = do
CRContactConnected _ contact _ -> do
contactConnected contact
sendMessage cc contact welcomeMessage
CRNewChatItem _ (AChatItem _ SMDRcv (DirectChat contact) ChatItem {content = mc@CIRcvMsgContent {}}) -> do
CRNewChatItems {chatItems = (AChatItem _ SMDRcv (DirectChat contact) ChatItem {content = mc@CIRcvMsgContent {}}) : _} -> do
let msg = T.unpack $ ciContentToText mc
number_ = readMaybe msg :: Maybe Integer
sendMessage cc contact $ case number_ of