diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/IRC.hs | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -52,7 +52,8 @@ noticeHandler = EventHandler (\_ () -> do liftIO $ putStrLn "Identification confirmation received, joining channel" liftIO $ hFlush stdout - send $ Join (T.pack "#haskell")) + send $ Join (T.pack "#haskell") + send $ Join (T.pack "#haskell-offtopic")) privmsgHandler :: (Text -> Bool) -> (Text -> IO [Text]) -> EventHandler s privmsgHandler commandDetect msgFun = EventHandler |