SimpleX-Chat/apps/simplex-broadcast-bot/Main.hs

12 lines
265 B
Haskell
Raw Permalink Normal View History

module Main where
import Broadcast.Bot
import Broadcast.Options
import Simplex.Chat.Core
import Simplex.Chat.Terminal (terminalChatConfig)
main :: IO ()
main = do
opts <- welcomeGetOpts
simplexChatCore terminalChatConfig (mkChatOpts opts) $ broadcastBot opts