X-Git-Url: https://git.rkrishnan.org/?p=functorrent.git;a=blobdiff_plain;f=src%2FFuncTorrent%2FBencode.hs;fp=src%2FFuncTorrent%2FBencode.hs;h=d4eb58c5ac12d0e4f811eb050f95266733b9f262;hp=28f0460a828af94d7d47ca978ed3bf4e290f6980;hb=d8f6d2ee948393ef149c19b72547aff57dfda7f6;hpb=e25e6620e9b648284b07c065199d3732e3360472 diff --git a/src/FuncTorrent/Bencode.hs b/src/FuncTorrent/Bencode.hs index 28f0460..d4eb58c 100644 --- a/src/FuncTorrent/Bencode.hs +++ b/src/FuncTorrent/Bencode.hs @@ -152,7 +152,7 @@ bencDict = between (char 'd') (char 'e') $ fromList <$> many kvpair return (k, v) bdictKey = do ds <- many1 digit <* char ':' - s <- count (read ds) alphaNum + s <- count (read ds) anyChar return s