|
@@ -260,7 +260,12 @@ let sort_stylesheet =
|
|
|
| 0 -> cmp tail_a tail_b
|
|
| 0 -> cmp tail_a tail_b
|
|
|
| n -> n
|
|
| n -> n
|
|
|
end
|
|
end
|
|
|
- | _ -> String.compare a b
|
|
|
|
|
|
|
+ | Some (stem_a, tail_a), None ->
|
|
|
|
|
+ String.compare stem_a b
|
|
|
|
|
+ | None, Some (stem_b, tail_b) ->
|
|
|
|
|
+ String.compare a stem_b
|
|
|
|
|
+ | _ ->
|
|
|
|
|
+ String.compare a b
|
|
|
in
|
|
in
|
|
|
let cmp_decls (a, _, _) (b, _, _) = cmp a b in
|
|
let cmp_decls (a, _, _) (b, _, _) = cmp a b in
|
|
|
Statement (Ruleset (selectors, List.stable_sort cmp_decls decls))
|
|
Statement (Ruleset (selectors, List.stable_sort cmp_decls decls))
|