Commit 94a36e40 authored by Taddeüs Kroes's avatar Taddeüs Kroes

Generated shorthands are now appended instead of prepended

parent 7c912845
...@@ -79,7 +79,7 @@ let make_shorthands decls = ...@@ -79,7 +79,7 @@ let make_shorthands decls =
in in
let shorthands = SS.fold replace try_shorthands [] in let shorthands = SS.fold replace try_shorthands [] in
(* filter out the original, partial properties, and prepend the shorthands *) (* filter out the original, partial properties, and append the shorthands *)
let keep_prop = function let keep_prop = function
| (_, _, true) -> true | (_, _, true) -> true
| ("line-height", _, false) -> | ("line-height", _, false) ->
...@@ -90,7 +90,7 @@ let make_shorthands decls = ...@@ -90,7 +90,7 @@ let make_shorthands decls =
let sub = Str.matched_group 2 name in let sub = Str.matched_group 2 name in
not (List.mem sub (subprops base)) || not (decls_mem base shorthands) not (List.mem sub (subprops base)) || not (decls_mem base shorthands)
in in
shorthands @ List.filter keep_prop decls List.filter keep_prop decls @ shorthands
let transform = function let transform = function
| Statement (Ruleset (selectors, decls)) -> | Statement (Ruleset (selectors, decls)) ->
......
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