Fixed bad comments and some cosmetics
This commit is contained in:
parent
1c8cab09cb
commit
4f50db8409
3 changed files with 6 additions and 5 deletions
|
@ -11,12 +11,13 @@ import Prelude hiding (catch)
|
|||
import Hsbot.Message
|
||||
import Hsbot.Types
|
||||
|
||||
-- | The ping plugin identity
|
||||
ping :: PluginId
|
||||
ping = PluginId
|
||||
{ pluginName = "ping"
|
||||
, pluginEp = thePing }
|
||||
|
||||
-- | The IrcPlugin monad main function
|
||||
-- | An IRC plugin that answer PING requests
|
||||
thePing :: Plugin (Env IO) ()
|
||||
thePing = forever $ readMsg >>= eval
|
||||
where
|
||||
|
|
Reference in a new issue