Skip to content

Commit

Permalink
Merge pull request #15 from Fuuzetsu/master
Browse files Browse the repository at this point in the history
Fix example.
  • Loading branch information
dom96 committed Jan 31, 2014
2 parents 4891c5f + a1d3deb commit 302c1d9
Showing 1 changed file with 2 additions and 3 deletions.
5 changes: 2 additions & 3 deletions example/example.hs
Original file line number Diff line number Diff line change
Expand Up @@ -12,12 +12,11 @@ onMessage s m
| otherwise = putStrLn $ show m
where chan = fromJust $ mChan m
msg = mMsg m

events = [(Privmsg onMessage)]

freenode = (mkDefaultConfig "irc.freenode.net" "SimpleIRCBot")
{
, cChannels = ["#()"] -- Channels to join on connect
{ cChannels = ["#()"] -- Channels to join on connect
, cEvents = events -- Events to bind
}

Expand Down

0 comments on commit 302c1d9

Please sign in to comment.