diff --git a/src/MiniDocs/LePictureSnippet.extension.st b/src/MiniDocs/LePictureSnippet.extension.st new file mode 100644 index 0000000..78e945b --- /dev/null +++ b/src/MiniDocs/LePictureSnippet.extension.st @@ -0,0 +1,15 @@ +Extension { #name : #LePictureSnippet } + +{ #category : #'*MiniDocs' } +LePictureSnippet >> asMarkdeep [ + | output | + output := WriteStream on: ''. + output + nextPutAll: self metadataDiv; + nextPutAll: self centeredFigure; + nextPut: Character lf; + nextPutAll: ''; + nextPut: Character lf; + nextPut: Character lf. + ^ output contents +] diff --git a/src/MiniDocs/LeTextualSnippet.extension.st b/src/MiniDocs/LeTextualSnippet.extension.st index f3baec3..1cc9be1 100644 --- a/src/MiniDocs/LeTextualSnippet.extension.st +++ b/src/MiniDocs/LeTextualSnippet.extension.st @@ -1,5 +1,27 @@ Extension { #name : #LeTextualSnippet } +{ #category : #'*MiniDocs' } +LeTextualSnippet >> asMarkdeep [ + "Inspired by Alpine.js and Assembler CSS 'x-' properties, we are going to use + 'st-' properties as a way to extend divs metadata regarding its contents." + + | output | + output := WriteStream on: ''. + output + nextPutAll: '