From 4f849d2e36318348e080d03529d0b8c52cf5d992 Mon Sep 17 00:00:00 2001
From: Offray Luna <offray.luna@mutabit.com>
Date: Sun, 9 Jul 2023 22:26:09 -0500
Subject: [PATCH] Improving Markdeep multiline images.

---
 src/MiniDocs/LePictureSnippet.extension.st | 15 +++++++++++++--
 1 file changed, 13 insertions(+), 2 deletions(-)

diff --git a/src/MiniDocs/LePictureSnippet.extension.st b/src/MiniDocs/LePictureSnippet.extension.st
index 7ff71e6..503e300 100644
--- a/src/MiniDocs/LePictureSnippet.extension.st
+++ b/src/MiniDocs/LePictureSnippet.extension.st
@@ -2,11 +2,22 @@ Extension { #name : #LePictureSnippet }
 
 { #category : #'*MiniDocs' }
 LePictureSnippet >> asMarkdeep [
-	| output |
+	| output curatedCaption captionLines |
+	captionLines := self caption lines. 
+	(captionLines size = 1) 
+		ifTrue: [ curatedCaption := caption ]
+		ifFalse: [
+			curatedCaption := WriteStream on: ''.
+			curatedCaption nextPutAll: captionLines first.
+			captionLines allButFirstDo: [:line |
+				curatedCaption nextPutAll: '    ', line.
+			curatedCaption := curatedCaption contents.
+			]
+		].
 	output := WriteStream on: ''.
 	output
 		nextPutAll: self metadataDiv;
-		nextPutAll: '![ ', self caption ,' ](', self urlString, ')';
+		nextPutAll: '![ ', curatedCaption ,' ](', self urlString, ')';
 		nextPut: Character lf;
 		nextPutAll: '</div>';
 		nextPut: Character lf;