Improved Markdeep exporter for snippets metadata readability.

src/MiniDocs/LePage.extension.st

@@ -190,6 +190,11 @@ LePage >> removeSnippetsMetadata [
 			ifTrue: [ snippet options removeKey: 'metadata' ] ]
 ]
 
+{ #category : #'*MiniDocs' }
+LePage >> sanitizeMetadata [
+	self allChildrenDepthFirst do: [:snippet | snippet sanitizeMetadata  ]
+]
+
 { #category : #'*MiniDocs' }
 LePage >> sharedVariablesBindings [
 	| codeSnippets shared |

src/MiniDocs/LeTextualSnippet.extension.st

@@ -10,7 +10,7 @@ LeTextualSnippet >> asMarkdeep [
 	output
 		nextPutAll: '<div st-class="' , self class greaseString , '"';
 		nextPut: Character lf;
-		nextPutAll: '  st-data="' , (STON toString: self metadata) , '">';
+		nextPutAll: '  st-data="' , (STON toStringPretty: self metadata) , '">';
 		nextPut: Character lf;
 		nextPutAll: self markdeepCustomOpener;
 		nextPutAll: self contentAsString;
@@ -19,7 +19,7 @@ LeTextualSnippet >> asMarkdeep [
 		nextPutAll: '</div>';
 		nextPut: Character lf;
 		nextPut: Character lf.
-	^ output contents
+	^ output contents withInternetLineEndings
 ]
 
 { #category : #'*MiniDocs' }

src/MiniDocs/LeYoutubeReferenceSnippet.extension.st

@@ -26,8 +26,8 @@ LeYoutubeReferenceSnippet >> metadataDiv [
 	output 
 		nextPutAll: '<div st-class="' , self class greaseString , '"';
 		nextPut: Character lf;
-		nextPutAll: '  st-data="' , (STON toString: self metadata) , '">'.
+		nextPutAll: '  st-data="' , (STON toStringPretty: self metadata) , '">'.
-	^ output.
+	^ output contents withInternetLineEndings.
 ]
 
 { #category : #'*MiniDocs' }