4 import qualified Network.Socket as N -- network
6 myServer = "irc.netwichtig.de" :: String
7 myPort = 6667 :: N.PortNumber
8 myChannels = ["#shelly-testing", "#shelly"] :: [String]
9 myNick = "shelly" :: String
12 main = runBirch myServer myPort myNick myChannels