diff options
| author | Julien Dessaux | 2010-04-22 00:05:35 +0200 |
|---|---|---|
| committer | Julien Dessaux | 2010-04-22 00:10:13 +0200 |
| commit | d922240e9a28680d48014604576620d7fc5aa605 (patch) | |
| tree | 60185f299eebb04d8da9b79e9afd011d6147e411 /Hsbot/IRCParser.hs | |
| parent | Make the main thread exit cleanly in case of connection loss. (diff) | |
| download | hsbot-d922240e9a28680d48014604576620d7fc5aa605.tar.gz hsbot-d922240e9a28680d48014604576620d7fc5aa605.tar.bz2 hsbot-d922240e9a28680d48014604576620d7fc5aa605.zip | |
Wrote the list plugin command.
Diffstat (limited to 'Hsbot/IRCParser.hs')
| -rw-r--r-- | Hsbot/IRCParser.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Hsbot/IRCParser.hs b/Hsbot/IRCParser.hs index a5f2e41..263ac1f 100644 --- a/Hsbot/IRCParser.hs +++ b/Hsbot/IRCParser.hs @@ -18,8 +18,8 @@ pMsg = do pfx <- optionMaybe pPrefix cmd <- pCommand params <- many (char ' ' >> (pLongParam <|> pShortParam)) - --char '\r' - eof + char '\r' + --eof return $ IrcMsg pfx cmd params pPrefix :: ParsecT String u Identity [Char] |