From: Mart Lubbers Date: Tue, 18 Jul 2017 12:22:09 +0000 (+0200) Subject: Fix hostname parsing for cloaked hostnames X-Git-Url: https://git.martlubbers.net/?a=commitdiff_plain;h=a7d6a92bc84d9b769c50106d2353012861b05a85;hp=--cc;p=cloogle-irc.git Fix hostname parsing for cloaked hostnames --- a7d6a92bc84d9b769c50106d2353012861b05a85 diff --git a/IRC.icl b/IRC.icl index f51bc8a..8d8d9fe 100644 --- a/IRC.icl +++ b/IRC.icl @@ -86,7 +86,7 @@ where >>= \s->optional (pToken '.') >>= pure o maybe s (\p->s+++toString s) where parseName :: Parser Char String - parseName = toString <$> pSome (pAlpha <|> pDigit <|> pOneOf ['-']) + parseName = toString <$> pSome (pAlpha <|> pDigit <|> pOneOf ['-', '/']) //Parse Cmd parseCmd :: [Char] -> Either Error IRCCommand