//OPER String String
//PART [String]
//PASS String
- //PING [String]
- //PONG [String]
- PRIVMSG dest msg = join " " ["PRIVMSG", dest, msg]
+ PING a mb = join " " ["PING",a:maybeToList mb]
+ PONG a mb = join " " ["PONG",a:maybeToList mb]
+ PRIVMSG dest msg = join " " ["PRIVMSG", dest, ":"+++msg]
QUIT msg = join " " ["QUIT":maybeToList msg]
//REHASH
//RESTART
//TIME (Maybe String)
//TOPIC String (Maybe String)
//TRACE (Maybe String)
- USER login mode rn = join " " ["USER", login, toString mode, "*", ":", rn]
+ USER login mode rn = join " " ["USER", login, toString mode, "*", ":"+++rn]
//USERHOST [String]
//USERS (Maybe String)
//VERSION (Maybe String)