diff options
| author | Julien Dessaux | 2010-02-04 20:55:54 +0100 |
|---|---|---|
| committer | Julien Dessaux | 2010-02-04 20:55:54 +0100 |
| commit | 53870767c32f61f756861d7bf18b5a55cd45a2e2 (patch) | |
| tree | 2cb6b79ecaa039f472a220b26ce2af44d52b488c /Hsbot/Core.hs | |
| parent | Implemented unregisterCommand. (diff) | |
| download | hsbot-53870767c32f61f756861d7bf18b5a55cd45a2e2.tar.gz hsbot-53870767c32f61f756861d7bf18b5a55cd45a2e2.tar.bz2 hsbot-53870767c32f61f756861d7bf18b5a55cd45a2e2.zip | |
Rewrote command handling, added the Quote module and cleaned input handling.
Diffstat (limited to 'Hsbot/Core.hs')
| -rw-r--r-- | Hsbot/Core.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/Hsbot/Core.hs b/Hsbot/Core.hs index 621e670..546358b 100644 --- a/Hsbot/Core.hs +++ b/Hsbot/Core.hs @@ -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" [] + |