~alcinnz/Mondrian

87e471d483acf9a724a570fd2b1029cd49575380 — Adrian Cochrane 1 year, 6 months ago 595c10c
Add shorthand property parsing.
1 files changed, 1 insertions(+), 0 deletions(-)

M lib/Graphics/Rendering/Rect/CSS.hs
M lib/Graphics/Rendering/Rect/CSS.hs => lib/Graphics/Rendering/Rect/CSS.hs +1 -0
@@ 18,6 18,7 @@ instance PropertyParser RectStyle where
    }

    shorthand self key value
        | ret@(_:_) <- shorthand (backgrounds self) key value = ret
        | Just _ <- longhand self self key value = [(key, value)]
        | otherwise = []
    longhand parent self key value