2023-02-14 01:57:27 -06:00
|
|
|
module Main where
|
|
|
|
|
|
2023-08-01 14:54:51 -05:00
|
|
|
import Broadcast.Bot
|
|
|
|
|
import Broadcast.Options
|
2023-02-14 01:57:27 -06:00
|
|
|
import Simplex.Chat.Core
|
|
|
|
|
import Simplex.Chat.Terminal (terminalChatConfig)
|
|
|
|
|
|
|
|
|
|
main :: IO ()
|
|
|
|
|
main = do
|
2023-02-18 11:39:16 -06:00
|
|
|
opts <- welcomeGetOpts
|
2023-10-11 03:50:11 -05:00
|
|
|
simplexChatCore terminalChatConfig (mkChatOpts opts) $ broadcastBot opts
|
