Archived
1
0
Fork 0

Rewrote command handling, added the Quote module and cleaned input handling.

This commit is contained in:
Julien Dessaux 2010-02-04 20:55:54 +01:00
parent 46d9dd301d
commit 53870767c3
9 changed files with 116 additions and 57 deletions

View file

@ -1,6 +1,7 @@
module Hsbot.Core
( connectServer
, disconnectServer
, emptyMsg
) where
import Control.Concurrent
@ -52,3 +53,6 @@ botReader handle chan = forever $ do
_ -> do
return ()
emptyMsg :: IrcMsg
emptyMsg = IrcMsg Nothing "EMPTY" []