added implode/explode help
This commit is contained in:
parent
179ed28c8d
commit
5a3f9ae602
1 changed files with 6 additions and 3 deletions
9
cnb.hs
9
cnb.hs
|
@ -7,10 +7,10 @@ import Control.Monad.State
|
||||||
import Text.Regex.Posix
|
import Text.Regex.Posix
|
||||||
import Data.Char (isSpace)
|
import Data.Char (isSpace)
|
||||||
|
|
||||||
server = "irc.epd-me.net"
|
server = "irc.freenode.net"
|
||||||
port = 6667
|
port = 6667
|
||||||
chan = "#selfhtml"
|
chan = "#monaden"
|
||||||
nick = "cnb"
|
nick = "cnbot"
|
||||||
rname = "clynx Nerv-Bot"
|
rname = "clynx Nerv-Bot"
|
||||||
|
|
||||||
type Nick = String
|
type Nick = String
|
||||||
|
@ -219,6 +219,9 @@ help n = do
|
||||||
msg (" " ++ nick ++ ": delete regex -> deletes the regex-value pair") n
|
msg (" " ++ nick ++ ": delete regex -> deletes the regex-value pair") n
|
||||||
msg (" " ++ nick ++ ": list -> lists all available regex-value pairs") n
|
msg (" " ++ nick ++ ": list -> lists all available regex-value pairs") n
|
||||||
msg (" " ++ nick ++ ": leave -> bot leaves the chanel") n
|
msg (" " ++ nick ++ ": leave -> bot leaves the chanel") n
|
||||||
|
msg (" " ++ nick ++ ": explode -> bot leaves the chanel") n
|
||||||
|
msg (" " ++ nick ++ ": implode -> bot leaves the chanel") n
|
||||||
|
|
||||||
msg (" /invite " ++ nick ++ " " ++ chan ++ " -> invites the bot back to the chanel") n
|
msg (" /invite " ++ nick ++ " " ++ chan ++ " -> invites the bot back to the chanel") n
|
||||||
|
|
||||||
startStore :: Store
|
startStore :: Store
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue