hlint fixes.
commita7f6241f508eb78047889c8e7c391d39f99b59ae
authorJohn MacFarlane <jgm@berkeley.edu>
dateSun 22 Nov 2015, 07:38 (11 years ago)
parent4b293a6
src/Text/Pandoc/CSS.hs+1−3
@@ -14,9 +14,7 @@ ruleParser = do
1414 return (trim p, trim v)
1515
1616styleAttrParser :: Parser [(String, String)]
17−styleAttrParser = do
18− p <- many1 ruleParser
19− return p
17+styleAttrParser = many1 ruleParser
2018
2119orElse :: Eq a => a -> a -> a -> a
2220orElse v x y = if v == x then y else x