diff --git a/repository/Grafoscopio/GrafoscopioNode.class.st b/repository/Grafoscopio/GrafoscopioNode.class.st
index adcc2f8..980e590 100644
--- a/repository/Grafoscopio/GrafoscopioNode.class.st
+++ b/repository/Grafoscopio/GrafoscopioNode.class.st
@@ -440,7 +440,7 @@ GrafoscopioNode >> markdownContent [
 				markdown nextPutAll: ' '. 
 				markdown nextPutAll: (self header copyReplaceTokens: #cr with: #lf); crlf; crlf.
 				embedNodes := self children select: [:each | ((each header findTokens: $ ) at: 1) = '%embed'].
-				temporalBody := self body.
+				temporalBody := self body asString.
 				embedNodes ifNotNil: [ 
 					(temporalBody includesSubstring: '%embed-all')
 						ifFalse: [embedNodes do: [ :each | temporalBody := temporalBody copyReplaceAll: (each header) with: each body]]