From 68cb325dd44380b5d56dbf78da030d4ab9906f70 Mon Sep 17 00:00:00 2001
From: "jeremy@jermolene.com" <jeremy@jermolene.com>
Date: Tue, 11 Apr 2023 17:59:55 +0100
Subject: [PATCH] Extend default testcase template to show all fields of
 payload tiddlers

---
 core/ui/TestCases/DefaultTemplate.tid       |  2 +-
 core/ui/TestCases/DefaultTemplateSource.tid | 17 +++++++++++++++++
 2 files changed, 18 insertions(+), 1 deletion(-)

diff --git a/core/ui/TestCases/DefaultTemplate.tid b/core/ui/TestCases/DefaultTemplate.tid
index 31926b2de..7fbe1c70d 100644
--- a/core/ui/TestCases/DefaultTemplate.tid
+++ b/core/ui/TestCases/DefaultTemplate.tid
@@ -10,7 +10,7 @@ title: $:/core/ui/testcases/DefaultTemplate
 </div>
 <div class="tc-testcase-panes">
 <div class="tc-testcase-source">
-<$macrocall $name="tabs" tabsList="[<testcaseInfo>jsonget[titles]] -Description -ExpectedResult -[has[plugin-type]]" state=<<state>> default="Output" template="$:/core/ui/testcases/DefaultTemplate/Source"/>
+<$macrocall $name="tabs" tabsList="[<testcaseInfo>jsonindexes[tiddlers]] -Description -ExpectedResult -[has[plugin-type]]" state=<<state>> default="Output" template="$:/core/ui/testcases/DefaultTemplate/Source"/>
 </div>
 <div class="tc-testcase-divider">
 </div>
diff --git a/core/ui/TestCases/DefaultTemplateSource.tid b/core/ui/TestCases/DefaultTemplateSource.tid
index 3242c8a6c..18ed8733c 100644
--- a/core/ui/TestCases/DefaultTemplateSource.tid
+++ b/core/ui/TestCases/DefaultTemplateSource.tid
@@ -1,3 +1,20 @@
 title: $:/core/ui/testcases/DefaultTemplate/Source
 
 <pre><$testcase-view tiddler=<<currentTab>>/></pre>
+<$list filter="[<testcaseInfo>jsonget[tiddlers],<currentTab>] -text -title +[limit[1]]" variable="ignore">
+	<table>
+		<tbody>
+			<tr><th>Field</th><th>Value</th></tr>
+			<$list filter="[<testcaseInfo>jsonget[tiddlers],<currentTab>] -text -title" variable="fieldName">
+				<tr>
+					<td>
+						<$text text=<<fieldName>>/>
+					</td>
+					<td>
+						<$testcase-view tiddler=<<currentTab>> field=<<fieldName>>/>
+					</td>
+				</tr>
+			</$list>
+		</tbody>
+	</table>
+</$list>
\ No newline at end of file