+# Get the link to a MEntity API documentation
+class CmdEntityLink
+ super CmdEntity
+
+ # The link text to display
+ var text: nullable String = null is optional, writable
+
+ # The link title to display when the link is hovered
+ var title: nullable String = null is optional, writable
+
+ redef fun init_command do
+ var res = super
+ if not res isa CmdSuccess then return res
+ var mentity = self.mentity.as(not null)
+
+ if text == null then
+ text = mentity.name
+ end
+ if title == null then
+ var mdoc = mentity.mdoc_or_fallback
+ if mdoc != null then
+ title = mdoc.synopsis
+ end
+ end
+ return res
+ end
+end
+
+# An abstract inheritance command
+#
+# For things like ancestors, parents, children and descendants.
+abstract class CmdInheritance
+ super CmdEntityList
+
+ autoinit(model, mainmodule, filter, mentity, mentity_name, limit, page, count, max)
+
+ # Mainmodule for class linearization
+ var mainmodule: MModule
+end
+