Index: tolbase/lib/toltk/markuphelper.tcl
===================================================================
--- tolbase/lib/toltk/markuphelper.tcl	(revision 9042aace984adab4116524c1d35f3d7a2c72c0f3)
+++ tolbase/lib/toltk/markuphelper.tcl	(revision d7349ff3605247c2ec22e0b27c391151640e31cd)
@@ -56,4 +56,12 @@
   proc Verbatim { text } {
     return [ string map {\n \n<br>} $text ]
+  }
+
+  proc Preformatted { text } {
+    variable markup
+
+    append markup "#pre\n"
+    append markup "${text}\n"
+    append markup "#unpre\n"
   }
 
@@ -288,11 +296,17 @@
     }
     BR
-    LabelValue "Content" [ Verbatim [ Escape $_content ] ]
+    if { $grammar eq "Text" } {
+      Text "Content:" -tags b
+      CR
+      Preformatted $_content
+    } else {
+      LabelValue "Content" [ Verbatim [ Escape $_content ] ]
+      BR
+    }
     if {$path ne ""} {
+      LabelValue "Path" $path
       BR
-      LabelValue "Path" $path
     }
     if {$desc ne ""} {
-      BR
       Text "Description:" -tags b -br 1
       Text \