diff --git a/src/MiniDocs/PubPubGrammar.class.st b/src/MiniDocs/PubPubGrammar.class.st index cca6509..1916907 100644 --- a/src/MiniDocs/PubPubGrammar.class.st +++ b/src/MiniDocs/PubPubGrammar.class.st @@ -17,21 +17,17 @@ PubPubGrammar >> document [ { #category : #links } PubPubGrammar >> link [ - ^ linkLabel, linkContent ==> #second + ^ linkLabel, linkContent ] { #category : #links } PubPubGrammar >> linkContent [ - | content | - content := ($} asPParser not) star flatten. - ^ ${ asPParser, content, $} asPParser + ^ '{' asPParser, #any asPParser starLazy flatten, '}' asPParser ==> #second. ] { #category : #links } PubPubGrammar >> linkLabel [ - | label | - label := ($] asPParser not) star flatten. - ^ $[ asPParser, label, $] asPParser + ^ $[ asPParser, #any asPParser starLazy flatten, $] asPParser ==> #second. ] { #category : #accessing }