From 162d126aeb4ca5ff083a739e515b45b22e01a3e8 Mon Sep 17 00:00:00 2001
From: Offray Luna <offray.luna@mutabit.com>
Date: Fri, 21 Oct 2022 21:05:40 -0500
Subject: [PATCH] Minimal detection of PubPub footnote links.

---
 src/MiniDocs/PubPubGrammar.class.st | 10 +++-------
 1 file changed, 3 insertions(+), 7 deletions(-)

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 }