module Main where import Lib import qualified Network.Socket as N -- network myServer = "irc.netwichtig.de" :: String myPort = 6667 :: N.PortNumber myChannels = ["#shelly-testing", "#shelly"] :: [String] myNick = "shelly" :: String main :: IO () main = runBirch myServer myPort myNick myChannels