Offray/GrafoscopioUtils
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Moving out functionality to MiniDocs.

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2022-09-09 12:39:13 -05:00
parent ccf9d2cd0f
commit 53326c077e
2 changed files with 0 additions and 27 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
repository/Grafoscopio-Utils/LePictureSnippet.extension.st
View File

@ -1,16 +1,5 @@
Extension { #name : #LePictureSnippet } Extension { #name : #LePictureSnippet }
{ #category : #'*Grafoscopio-Utils-Core' }
LePictureSnippet >> asMarkdeep [
| output extraData |
output := '' writeStream.
output
nextPutAll: self metadataDiv;
nextPutAll: self centeredFigure; lf;
nextPutAll: '</div>'; lf; lf.
^ output contents
]
{ #category : #'*Grafoscopio-Utils-Core' } { #category : #'*Grafoscopio-Utils-Core' }
LePictureSnippet >> centeredFigure [ LePictureSnippet >> centeredFigure [

16
repository/Grafoscopio-Utils/LeTextualSnippet.extension.st
View File

@ -1,21 +1,5 @@
Extension { #name : #LeTextualSnippet } Extension { #name : #LeTextualSnippet }
{ #category : #'*Grafoscopio-Utils-Core' }
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.
output
nextPutAll: '<div st-class="', self class asString, '"'; lf;
nextPutAll: ' st-data="', (STON toString: self metadata), '">'; lf;
nextPutAll: self markdeepCustomOpener;
nextPutAll: self contentAsString; lf;
nextPutAll: self markdeepCustomCloser;
nextPutAll: '</div>'; lf; lf.
^ output contents
]
{ #category : #'*Grafoscopio-Utils-Core' } { #category : #'*Grafoscopio-Utils-Core' }
LeTextualSnippet >> childrenIds [ LeTextualSnippet >> childrenIds [
^ self children collect: [ :each | each uidString ] ^ self children collect: [ :each | each uidString ]