diff --git a/src/MiniDocs/Markdeep.class.st b/src/MiniDocs/Markdeep.class.st
index 80ca0e7..6265359 100644
--- a/src/MiniDocs/Markdeep.class.st
+++ b/src/MiniDocs/Markdeep.class.st
@@ -46,6 +46,11 @@ Markdeep >> body: anObject [
 	body := anObject
 ]
 
+{ #category : #accessing }
+Markdeep >> bodyReplaceAll: original with: replacement [ 
+	self body: (self body copyReplaceAll: original with: replacement)
+]
+
 { #category : #accessing }
 Markdeep >> comments [
 	^ comments ifNil: [  ^ comments := true ]
@@ -219,6 +224,11 @@ Markdeep >> metadata [
 	^ metadata ifNil: [ metadata := OrderedDictionary new ]
 ]
 
+{ #category : #accessing }
+Markdeep >> metadata: anOrderedDictionary [
+	metadata := anOrderedDictionary 
+]
+
 { #category : #utilities }
 Markdeep >> metadataFromXML: aXMLDocument [
 	| metaDict |
@@ -291,7 +301,7 @@ Markdeep >> tail: anObject [
 { #category : #accessing }
 Markdeep >> title [
 
-	^ title
+	^ title ifNil: [ title := self metadata at: 'title' ]
 ]
 
 { #category : #accessing }