Fix default order of children

ocaml · Dec 6, 2024 · 417d4b4 · 417d4b4
1 parent 8c11397
commit 417d4b4
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/src/index/skeleton_of.ml b/src/index/skeleton_of.ml
@@ -11,7 +11,6 @@ type t = Entry.t Tree.t
 let compare_entry (t1 : t) (t2 : t) =
   let by_kind (t : t) =
     match t.node.kind with
-    | Page _ when List.is_empty t.children -> -10
     | Page _ | Dir -> 0
     | Module _ -> 10
     | Impl -> 20