From b799d924f09606615a0ece46d7de9a72e35548ba Mon Sep 17 00:00:00 2001
From: Jermolene <jeremy@jermolene.com>
Date: Fri, 29 Mar 2019 22:04:13 +0000
Subject: [PATCH] Trial implementing pretty links via a macro

An experiment for #3883
---
 .../parsers/wikiparser/macros/prettylink.tid        | 13 +++++++++++++
 core/modules/parsers/wikiparser/rules/prettylink.js | 13 ++++++-------
 2 files changed, 19 insertions(+), 7 deletions(-)
 create mode 100644 core/modules/parsers/wikiparser/macros/prettylink.tid

diff --git a/core/modules/parsers/wikiparser/macros/prettylink.tid b/core/modules/parsers/wikiparser/macros/prettylink.tid
new file mode 100644
index 000000000..81ceaed07
--- /dev/null
+++ b/core/modules/parsers/wikiparser/macros/prettylink.tid
@@ -0,0 +1,13 @@
+title: $:/core/macros/shortcuts/prettylink
+tags: $:/tags/Macro
+
+\define x-tm-prettylink-internal(to,text)
+<$link to=<<__to__>>><$text text=<<__text__>>/></$link>
+\end
+
+\define tm-prettylink-internal(to,text)
+<$button>
+<$action-navigate $to=<<__to__>>/>
+<$text text=<<__text__>>/>
+</$button>
+\end
diff --git a/core/modules/parsers/wikiparser/rules/prettylink.js b/core/modules/parsers/wikiparser/rules/prettylink.js
index 56a2850a3..5cf446f50 100644
--- a/core/modules/parsers/wikiparser/rules/prettylink.js
+++ b/core/modules/parsers/wikiparser/rules/prettylink.js
@@ -49,13 +49,12 @@ exports.parse = function() {
 		}];
 	} else {
 		return [{
-			type: "link",
-			attributes: {
-				to: {type: "string", value: link}
-			},
-			children: [{
-				type: "text", text: text
-			}]
+			type: "macrocall",
+			name: "tm-prettylink-internal",
+			params: [
+				{name: "to", value: link},
+				{name: "text", value: text}
+			]
 		}];
 	}
 };