diff --git a/editions/tw5.com/tiddlers/_tw_shared/doc-utilities/doc-macros.tid b/editions/tw5.com/tiddlers/_tw_shared/doc-utilities/doc-macros.tid
index 8bd5ba449..45e5e1c90 100644
--- a/editions/tw5.com/tiddlers/_tw_shared/doc-utilities/doc-macros.tid
+++ b/editions/tw5.com/tiddlers/_tw_shared/doc-utilities/doc-macros.tid
@@ -36,13 +36,56 @@ type: text/vnd.tiddlywiki
- <$list filter="[all[current]fields[]sort[title]] -title" template="$:/core/ui/TiddlerFieldTemplate" variable="listItem"/>
+ <$list filter="[all[current]fields[]sort[title]] -title -text" template="$:/core/ui/TiddlerFieldTemplate" variable="listItem"/>
+ <$codeblock code={{{ [get[text]] }}}/>
$tiddler>
\end
+\procedure .demo-tiddler(tidText)
+ \procedure create-tiddler-actions()
+ <$action-setmultiplefields $tiddler=<> $fields="[jsonindexes[0]sort[]]" $values="[jsonindexes[0]sort[]] :map[jsonget[0],]"/>
+ \end create-tiddler-actions
+ <$let
+ jsonTiddler={{{ [deserialize[application/x-tiddler]] }}}
+ title={{{ [jsonget[0],[title]] }}}
+ >
+
+
+ <$link to=<>>
+ <$text text=<>/>
+ $link>
+
+
+
+ <$list filter="[jsonindexes[0]sort[]] -title -text" variable="listItem">
+
+ |
+ <$text text=<>/>
+ |
+
+ <$text text={{{ [jsonget[0],] }}}/>
+ |
+
+ $list>
+
+
+ <$codeblock code={{{ [
jsonget[0],[text]] }}}/>
+
+ <%if [
has[title]] %>
+ The tiddler '<$link to=<>><$text text=<>/>$link>' already exists
+ <%else%>
+ <$button actions=<> class="tc-btn-big-green">
+ Create this tiddler
+ $button>
+ <%endif%>
+
+
+ $let>
+\end
+
\function .mtitle(_) [<_>] Macro +[join[ ]]
\function .otitle(_) [<_>] Operator +[join[ ]]
\function .vtitle(_) [<_>] Variable +[join[ ]]