var name_sorter = new MEntityNameSorter
redef fun apply do
- for page in doc.pages do
+ for page in doc.pages.values do
if page isa MEntityPage then page.build_inh_list(self, doc)
end
end
redef class MModulePage
redef fun build_inh_list(v, doc) do
- var section = new ImportationListSection
+ var section = new ImportationListSection(mentity)
+ var group = new PanelGroup("List")
var imports = self.imports.to_a
v.name_sorter.sort(imports)
- section.children.add new HierarchyListArticle(mentity, "Imports", imports)
+ group.add_child new HierarchyListArticle(mentity, "Imports", imports)
var clients = self.clients.to_a
v.name_sorter.sort(clients)
- section.children.add new HierarchyListArticle(mentity, "Clients", clients)
- root.children.insert(section, 1)
+ group.add_child new HierarchyListArticle(mentity, "Clients", clients)
+ section.add_child group
+ section.parent = root.children.first
+ root.children.first.children.insert(section, 1)
end
end
redef class MClassPage
redef fun build_inh_list(v, doc) do
- var section = new InheritanceListSection
+ var section = new InheritanceListSection(mentity)
+ var group = new PanelGroup("List")
var parents = self.parents.to_a
v.name_sorter.sort(parents)
- section.children.add new HierarchyListArticle(mentity, "Parents", parents)
+ group.add_child new HierarchyListArticle(mentity, "Parents", parents)
var ancestors = self.ancestors.to_a
v.name_sorter.sort(ancestors)
- section.children.add new HierarchyListArticle(mentity, "Ancestors", ancestors)
+ group.add_child new HierarchyListArticle(mentity, "Ancestors", ancestors)
var children = self.children.to_a
v.name_sorter.sort(children)
- section.children.add new HierarchyListArticle(mentity, "Children", children)
+ group.add_child new HierarchyListArticle(mentity, "Children", children)
var descendants = self.descendants.to_a
v.name_sorter.sort(descendants)
- section.children.add new HierarchyListArticle(mentity, "Descendants", descendants)
- root.children.insert(section, 1)
+ group.add_child new HierarchyListArticle(mentity, "Descendants", descendants)
+ section.add_child group
+ section.parent = root.children.first
+ root.children.first.children.insert(section, 1)
end
end
# FIXME diff hack
class ImportationListSection
- super DocSection
+ super TabbedGroup
+ super MEntityComposite
end
# FIXME diff hack
class InheritanceListSection
- super DocSection
+ super TabbedGroup
+ super MEntityComposite
end
# Dislay a hierarchical list of mentities.