Fixed several stuff.
This commit is contained in:
parent
bfc06f1ff1
commit
4c76d3d40b
10 changed files with 25 additions and 21 deletions
|
@ -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]
|
||||
|
|
Reference in a new issue