From 0bdc5b5c70fbbf34aa459afcf0499fc9c8ae6374 Mon Sep 17 00:00:00 2001
From: Jermolene <jeremy@osmosoft.com>
Date: Wed, 18 Jun 2014 13:52:22 +0100
Subject: [PATCH] Add editor type mappings to control panel

---
 core/language/en-GB/ControlPanel.multids      |  4 +++
 core/ui/ControlPanel/Advanced/EditorTypes.tid | 30 +++++++++++++++++++
 2 files changed, 34 insertions(+)
 create mode 100644 core/ui/ControlPanel/Advanced/EditorTypes.tid

diff --git a/core/language/en-GB/ControlPanel.multids b/core/language/en-GB/ControlPanel.multids
index 88b1b3198..f89384bdb 100644
--- a/core/language/en-GB/ControlPanel.multids
+++ b/core/language/en-GB/ControlPanel.multids
@@ -1,6 +1,10 @@
 title: $:/language/ControlPanel/
 
 Advanced/Caption: Advanced
+Advanced/EditorTypes/Caption: Editor Types
+Advanced/EditorTypes/Editor/Caption: Editor
+Advanced/EditorTypes/Hint: These tiddlers determine which editor is used to edit specific tiddler types.
+Advanced/EditorTypes/Type/Caption: Type
 Advanced/Hint: Internal information about this TiddlyWiki
 Advanced/LoadedModules/Caption: Loaded Modules
 Advanced/LoadedModules/Hint: These are the currently loaded tiddler modules linked to their source tiddlers. Any italicised modules lack a source tiddler, typically because they were setup during the boot process.
diff --git a/core/ui/ControlPanel/Advanced/EditorTypes.tid b/core/ui/ControlPanel/Advanced/EditorTypes.tid
new file mode 100644
index 000000000..18b504d6c
--- /dev/null
+++ b/core/ui/ControlPanel/Advanced/EditorTypes.tid
@@ -0,0 +1,30 @@
+title: $:/core/ui/ControlPanel/Advanced/EditorTypes
+tags: $:/tags/ControlPanel/Advanced
+caption: {{$:/language/ControlPanel/Advanced/EditorTypes/Caption}}
+
+\define lingo-base() $:/language/ControlPanel/Advanced/EditorTypes/
+
+<<lingo Hint>>
+
+<table>
+<tbody>
+<tr>
+<th><<lingo Type/Caption>></th>
+<th><<lingo Editor/Caption>></th>
+</tr>
+<$list filter="[all[shadows+tiddlers]prefix[$:/config/EditorTypeMappings/]sort[title]]">
+<tr>
+<td>
+<$link>
+<$list filter="[all[current]removeprefix[$:/config/EditorTypeMappings/]]">
+<$text text={{!!title}}/>
+</$list>
+</$link>
+</td>
+<td>
+<$view field="text"/>
+</td>
+</tr>
+</$list>
+</tbody>
+</table>