c1662ba7b9
* Rewrote the whole architecture to achieve extreme modularity * Added the ability to build a multiprotocol bot * Added cabal integration * Added configuration handling the XMonad style * Added configuration in ~/.hsbot * Refactored many many named and functions * Refactored data structures * Cleaned a big bunch of stuff
15 lines
385 B
Haskell
15 lines
385 B
Haskell
module Hsbot.Message
|
|
( BotMsg (..)
|
|
, Msg (..)
|
|
) where
|
|
|
|
-- | A hsbot message
|
|
data Msg = Msg
|
|
{ msgType :: String -- the message type
|
|
, msgFrom :: String -- who issues it
|
|
, msgTo :: String -- who it is destinated to
|
|
, msgCmd :: String -- the message to be transfered
|
|
} deriving (Show)
|
|
|
|
data BotMsg = InMsg Msg | OutMsg Msg | IntMsg Msg deriving (Show)
|
|
|