diff --git a/src/MiniDocs/LeDatabase.extension.st b/src/MiniDocs/LeDatabase.extension.st
index 24d500e..9f98164 100644
--- a/src/MiniDocs/LeDatabase.extension.st
+++ b/src/MiniDocs/LeDatabase.extension.st
@@ -256,7 +256,9 @@ LeDatabase >> sanitizeMarkdeepSnippets: divSnippets withMetadata: remoteMetadata
     	snippetData := markdeepDiv asSnippetDictionary.
 		creationTime := snippetData at: 'created'.
 		modificationTime := snippetData at: 'modified'.
-		timestampWarning := [:timestamp | 'Modified timestamps: ', timestamp ,' date and time was replaced instead of nil value. See "origin" metadata for more historical traceability information.'].
+		timestampWarning := [:timestamp | 
+			'Modified timestamps: ', timestamp ,' date and time was replaced instead of nil value. See "origin" metadata for more historical traceability information.'
+		].
 		(creationTime = 'nil' and: [ modificationTime ~= 'nil' ]) 
 			ifTrue: [ 
 				snippetData redefineTimestampsBefore: modificationTime.
diff --git a/src/MiniDocs/OrderedDictionary.extension.st b/src/MiniDocs/OrderedDictionary.extension.st
index fca93a2..158e00d 100644
--- a/src/MiniDocs/OrderedDictionary.extension.st
+++ b/src/MiniDocs/OrderedDictionary.extension.st
@@ -18,7 +18,12 @@ OrderedDictionary >> asLepiterSnippet [
 		ifTrue: [
 			response := LePharoSnippet new.
 			response code: (self at: 'content')
-		].	
+		].
+	(self at: 'className') = 'LePictureSnippet'
+		ifTrue: [
+			response := LePictureSnippet new.
+			"response code: (self at: 'content')"
+		].		
 	response
 		uid: (LeUID new uidString: (self at: 'id'));
 		parent: (self at: 'parent');
diff --git a/src/MiniDocs/XMLElement.extension.st b/src/MiniDocs/XMLElement.extension.st
index 704bc95..04179db 100644
--- a/src/MiniDocs/XMLElement.extension.st
+++ b/src/MiniDocs/XMLElement.extension.st
@@ -13,11 +13,12 @@ XMLElement >> asSnippetDictionary [
 XMLElement >> sanitizedContent [
 	| className sanitizedText |
 	className := self attributes at: 'st-class'.
-	(className = 'LeTextSnippet') ifTrue: [ 
-		sanitizedText := self contentString.
-		sanitizedText :=  sanitizedText allButFirst.
-		sanitizedText := sanitizedText allButLast.
-	].
+	((className = 'LeTextSnippet') or: [className = 'LePictureSnippet']) 
+		ifTrue: [ 
+			sanitizedText := self contentString.
+			sanitizedText :=  sanitizedText allButFirst.
+			sanitizedText := sanitizedText allButLast.
+		].
 	(className = 'LePharoSnippet') ifTrue: [ | joinedText |
 		sanitizedText := self contentString lines.
 		sanitizedText :=  sanitizedText copyFrom: 4 to: sanitizedText size -2.