Rewrote command handling, added the Quote module and cleaned input handling.
This commit is contained in:
parent
46d9dd301d
commit
53870767c3
9 changed files with 116 additions and 57 deletions
|
@ -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" []
|
||||
|
||||
|
|
Reference in a new issue