Commit 8b440b27 authored by Taddeüs Kroes's avatar Taddeüs Kroes

Color optimization now works on all expressions

parent 7e287918
...@@ -51,11 +51,10 @@ let rec short = function ...@@ -51,11 +51,10 @@ let rec short = function
| Function ("rgb", Nary (",", [r; g; b])) -> | Function ("rgb", Nary (",", [r; g; b])) ->
Function ("rgb", Nary (",", [clip r; clip g; clip b])) Function ("rgb", Nary (",", [clip r; clip g; clip b]))
| c -> c | v -> v
let transform = function let transform = function
| Declaration ("color", color, imp) -> | Expr value -> Expr (short value)
Declaration ("color", short color, imp)
| v -> v | v -> v
let compress = Util.transform_stylesheet transform let compress = Util.transform_stylesheet transform
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