X-Git-Url: http://nitlanguage.org

diff --git a/src/doc/doc_base.nit b/src/doc/doc_base.nit
index 4d29cd7..29efa62 100644
--- a/src/doc/doc_base.nit
+++ b/src/doc/doc_base.nit
@@ -78,9 +78,10 @@ class DocPage
 	# Pretty prints the content of this page.
 	fun pretty_print: Writable do
 		var res = new Template
-		res.addn "page: {title}"
-		res.addn ""
-		root.pretty_print_in(res)
+		res.addn "{class_name} {title}"
+		for child in root.children do
+			child.pretty_print_in(res)
+		end
 		return res
 	end
 end
@@ -110,7 +111,7 @@ abstract class DocComposite
 	var id: String is writable
 
 	# Item title if any.
-	var title: nullable String
+	var title: nullable String is writable
 
 	# Does `self` have a `parent`?
 	fun is_root: Bool do return parent == null
@@ -156,6 +157,7 @@ abstract class DocComposite
 
 	# Appends the Pretty print of this composite in `res`.
 	private fun pretty_print_in(res: Template) do
+		res.add "\t" * depth
 		res.add "#" * depth
 		res.addn " {id}"
 		for child in children do child.pretty_print_in(res)