~alcinnz/haskell-stylist

67f348bb09a6bff991c3089b0aa68b2a8f8ff6a0 — Adrian Cochrane 1 year, 6 months ago afa21a7
Add priority method to VarParser decorator.
1 files changed, 1 insertions(+), 0 deletions(-)

M src/Data/CSS/Style.hs
M src/Data/CSS/Style.hs => src/Data/CSS/Style.hs +1 -0
@@ 120,6 120,7 @@ data VarParser a = VarParser {vars :: Props, innerParser :: a}
instance PropertyParser p => PropertyParser (VarParser p) where
    temp = VarParser [] temp
    inherit (VarParser vars' self) = VarParser vars' $ inherit self
    priority (VarParser _ self) = priority self

    shorthand self name' value
        | Function "var" `elem` value || "--" `isPrefixOf` name' = [(name', value)] -- Fail during inheritance...