* Generate elisp_type_hierarchy.txt with top level types on top of it

* admin/syncdoc-type-hierarchy.el (syncdoc-make-type-table): Prioratize
to level types.

diff --git a/admin/syncdoc-type-hierarchy.el b/admin/syncdoc-type-hierarchy.el
index 56f2c30527ef0500bf2bc6e363f6dfadb70864cf..ed827844d0bced3bd3ac6624817c741f9a508723 100644 (file)
--- a/admin/syncdoc-type-hierarchy.el
+++ b/admin/syncdoc-type-hierarchy.el
@@ -97,7 +97,7 @@
             (lambda (x1 x2)
               (< (length (memq (car x2) syncdoc-all-types))
                  (length (memq (car x1) syncdoc-all-types)))))
-      (cl-loop for (type . children) in subtypes
+      (cl-loop for (type . children) in (reverse subtypes)
                do (insert "|" (symbol-name type) " |")
                do (cl-loop with x = 0
                            for child in children