diff options
-rw-r--r-- | hirc.hs | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -9,8 +9,8 @@ import Text.Printf server = "irc.freenode.org" port = 6667 -chan = "#tutbot-testing" -nick = "tutbot" +chan = "#hirc-testing" +nick = "hirc" -- The 'Net' monad, a wrapper over IO, carrying the bot's immutable state. type Net = ReaderT Bot IO @@ -40,7 +40,7 @@ connect = notify $ do run :: Net () run = do write "NICK" nick - write "USER" (nick++" 0 * :tutorial bot") + write "USER" (nick++" 0 * :hirc bot") write "JOIN" chan asks socket >>= listen |