From 93771fdf279866c01bd421244bfaefba4672e2c8 Mon Sep 17 00:00:00 2001
From: Jermolene <jeremy@jermolene.com>
Date: Fri, 28 Apr 2017 09:41:27 +0100
Subject: [PATCH] Show raw text (instead of wikified) of system tiddlers

Fixes #2814
---
 core/ui/ViewTemplate/body.tid | 18 +++++++++++++-----
 1 file changed, 13 insertions(+), 5 deletions(-)

diff --git a/core/ui/ViewTemplate/body.tid b/core/ui/ViewTemplate/body.tid
index f2d65332e..19cb3de11 100644
--- a/core/ui/ViewTemplate/body.tid
+++ b/core/ui/ViewTemplate/body.tid
@@ -1,16 +1,24 @@
 title: $:/core/ui/ViewTemplate/body
 tags: $:/tags/ViewTemplate
 
+\define re() ^\$\:\/([^/])*$
+
 <$reveal tag="div" class="tc-tiddler-body" type="nomatch" state=<<folded-state>> text="hide" retain="yes" animate="yes">
 
-<$list filter="[all[current]!has[plugin-type]!field:hide-body[yes]]">
+<$list filter="[all[current]is[missing]!is[shadow]]" template="$:/language/MissingTiddler/Hint" emptyMessage="""
 
-<$transclude>
+<$list filter="[all[current]!is[system]] [all[current]tag[$:/tags/Image]] [all[current]regexp<re>] +[!has[plugin-type]!field:hide-body[yes]]">
 
-<$transclude tiddler="$:/language/MissingTiddler/Hint"/>
-
-</$transclude>
+<$transclude/>
 
 </$list>
 
+<$list filter="[all[current]is[system]] -[all[current]tag[$:/tags/Image]] -[all[current]regexp<re>] +[!has[plugin-type]!field:hide-body[yes]]">
+
+<$codeblock code={{!!text}} language={{!!type}}/>
+
+</$list>
+
+"""/>
+
 </$reveal>
\ No newline at end of file