core: keep chat item edit history (#2410)

This commit is contained in:
spaced4ndy
2023-05-08 20:07:51 +04:00
committed by GitHub
parent 27762492d7
commit c87f4e68f7
14 changed files with 415 additions and 30 deletions
+3 -1
View File
@@ -4,6 +4,7 @@ module Main where
import Control.Concurrent (threadDelay)
import Data.Time.Clock (getCurrentTime)
import Data.Time.LocalTime (getCurrentTimeZone)
import Server
import Simplex.Chat.Controller (versionNumber, versionString)
import Simplex.Chat.Core
@@ -29,7 +30,8 @@ main = do
else simplexChatCore terminalChatConfig opts Nothing $ \user cc -> do
r <- sendChatCmd cc chatCmd
ts <- getCurrentTime
putStrLn $ serializeChatResponse (Just user) ts r
tz <- getCurrentTimeZone
putStrLn $ serializeChatResponse (Just user) ts tz r
threadDelay $ chatCmdDelay opts * 1000000
welcome :: ChatOpts -> IO ()