diff options
author | Julien Dessaux | 2010-04-21 20:57:22 +0200 |
---|---|---|
committer | Julien Dessaux | 2010-04-21 20:57:22 +0200 |
commit | 4c76d3d40bbfea365283c13256b3e7cf2d2deb5e (patch) | |
tree | b5f4e70d225ba0247ad0691e37b45b8cb4142f6c /Hsbot/IRCParser.hs | |
parent | Fixed the clean killing of plugin's threads, fixed exception management and c... (diff) | |
download | hsbot-4c76d3d40bbfea365283c13256b3e7cf2d2deb5e.tar.gz hsbot-4c76d3d40bbfea365283c13256b3e7cf2d2deb5e.tar.bz2 hsbot-4c76d3d40bbfea365283c13256b3e7cf2d2deb5e.zip |
Fixed several stuff.
Diffstat (limited to '')
-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 ebf8f71..a5f2e41 100644 --- a/Hsbot/IRCParser.hs +++ b/Hsbot/IRCParser.hs @@ -24,9 +24,9 @@ pMsg = do pPrefix :: ParsecT String u Identity [Char] pPrefix = do - char ':' + _ <- char ':' pfx <- many1 (noneOf " ") - space + _ <- space return pfx pCommand :: ParsecT String u Identity [Char] |