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

12 lines
273 B
Haskell
Raw 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) Nothing $ broadcastBot opts