diff --git a/src/MiniDocs/XMLElement.extension.st b/src/MiniDocs/XMLElement.extension.st index 90104ee..76e8d74 100644 --- a/src/MiniDocs/XMLElement.extension.st +++ b/src/MiniDocs/XMLElement.extension.st @@ -32,7 +32,14 @@ XMLElement >> sanitizedContent [ accept: CMBlockVisitor new. linkParserNodes := linkParser children first children. linkParserNodes size = 1 - ifTrue: [ sanitizedText := linkParserNodes first label text ] + ifTrue: [ + linkParserNodes first className = 'PPCMLink' + ifTrue: [ sanitizedText := linkParserNodes first label text] + ifFalse: [ + sanitizedText := (linkParserNodes first text splitOn: '](') first. + sanitizedText := sanitizedText copyReplaceAll: '![' with: '' + ] + ] ifFalse: [ sanitizedText := '' writeStream. linkParserNodes allButLast do: [:each |