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

Starting support for PubPub image links extended syntax.

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2022-10-25 06:49:55 -05:00
parent dc7a4b93d1
commit 53284f1983
1 changed files with 30 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
src/MiniDocs/PubPubGrammar.class.st
View File

@ -5,16 +5,45 @@ Class {
'document', 'document',
'link', 'link',
'linkLabel', 'linkLabel',
'linkContent' 'linkContent',
'imageLinkLabel',
'imageLinkContent',
'alternativeImages',
'imageLink'
], ],
#category : #'MiniDocs-Model' #category : #'MiniDocs-Model'
} }
{ #category : #accessing }
PubPubGrammar >> alternativeImages [
^ self linkContent
]
{ #category : #accessing } { #category : #accessing }
PubPubGrammar >> document [ PubPubGrammar >> document [
^ link islandInSea star ^ link islandInSea star
] ]
{ #category : #links }
PubPubGrammar >> imageLink [
^ imageLinkLabel, imageLinkContent, alternativeImages
]
{ #category : #links }
PubPubGrammar >> imageLinkContent [
^ '(' asPParser, #any asPParser starLazy flatten, ')' asPParser ==> #second
]
{ #category : #links }
PubPubGrammar >> imageLinkLabel [
^ '![' asPParser, #any asPParser starLazy flatten, $] asPParser ==> #second
]
{ #category : #accessing }
PubPubGrammar >> imageLinkSea [
^ imageLink sea ==> #second
]
{ #category : #links } { #category : #links }
PubPubGrammar >> link [ PubPubGrammar >> link [
^ linkLabel, linkContent ^ linkLabel, linkContent