diff options
| author | tv <tv@shackspace.de> | 2015-10-10 02:34:13 +0200 |
|---|---|---|
| committer | tv <tv@shackspace.de> | 2015-10-10 02:34:13 +0200 |
| commit | 66ea960c626853c2ae15124fd8c71b5cb5df93c8 (patch) | |
| tree | 7affe5cd971ef9a7fed2f39fd56ea10f170335c5 /Hirc | |
| parent | cd27619974479911463ec2eef8abc5c6b86fedb0 (diff) | |
Hirc.Parser.message: accept empty trailing
Diffstat (limited to 'Hirc')
| -rw-r--r-- | Hirc/Parser.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Hirc/Parser.hs b/Hirc/Parser.hs index ef34270..f52564b 100644 --- a/Hirc/Parser.hs +++ b/Hirc/Parser.hs @@ -18,6 +18,6 @@ message = host = many1 (noneOf " !@") command = many1 nonspace params = many1 (spaces1 *> (trailing <|> middle)) - trailing = char ':' *> many1 anyChar + trailing = char ':' *> many anyChar middle = many1 nonspace nonspace = satisfy (not . isSpace) |