Commit a0d39a85 authored by Duncan Coutts's avatar Duncan Coutts
Browse files

Remove redundant Char test in parseBuildToolName

It was made redundant after the isSymbol test was removed.
Spotted by Igloo.
parent bbea683b
......@@ -545,10 +545,7 @@ parseBuildToolName :: ReadP r String
parseBuildToolName = do ns <- sepBy1 component (ReadP.char '-')
return (intercalate "-" ns)
where component = do
cs <- munch1 (\c -> isAlphaNum c
|| c == '+'
|| c == '_'
&& c /= '-')
cs <- munch1 (\c -> isAlphaNum c || c == '+' || c == '_')
if all isDigit cs then pfail else return cs
-- pkg-config allows versions and other letters in package names,
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment