From 8e03eefa9bc36f7969525c1a5284eb8a9982be72 Mon Sep 17 00:00:00 2001 From: Evgeny Poberezkin <2769109+epoberezkin@users.noreply.github.com> Date: Mon, 31 Jan 2022 23:20:52 +0000 Subject: [PATCH] update API commands syntax --- src/Simplex/Chat.hs | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/src/Simplex/Chat.hs b/src/Simplex/Chat.hs index abf01ceee7..853c706e30 100644 --- a/src/Simplex/Chat.hs +++ b/src/Simplex/Chat.hs @@ -1318,12 +1318,12 @@ withStore action = chatCommandP :: Parser ChatCommand chatCommandP = - "/get chats" $> APIGetChats - <|> "/get chat " *> (APIGetChat <$> chatTypeP <*> A.decimal) - <|> "/get chatItems count=" *> (APIGetChatItems <$> A.decimal) - <|> "/send msg " *> (APISendMessage <$> chatTypeP <*> A.decimal <* A.space <*> msgContentP) - <|> "/_del " *> (APIDeleteChat <$> chatTypeP <*> A.decimal) - <|> "/_ac " *> (APIAcceptContact <$> A.decimal) + "/_get chats" $> APIGetChats + <|> "/_get chat " *> (APIGetChat <$> chatTypeP <*> A.decimal) + <|> "/_get items count=" *> (APIGetChatItems <$> A.decimal) + <|> "/_send " *> (APISendMessage <$> chatTypeP <*> A.decimal <* A.space <*> msgContentP) + <|> "/_delete " *> (APIDeleteChat <$> chatTypeP <*> A.decimal) + <|> "/_accept " *> (APIAcceptContact <$> A.decimal) <|> ("/help files" <|> "/help file" <|> "/hf") $> ChatHelp HSFiles <|> ("/help groups" <|> "/help group" <|> "/hg") $> ChatHelp HSGroups <|> ("/help address" <|> "/ha") $> ChatHelp HSMyAddress