--- deliantra/Deliantra-Client/DC.pm	2006/05/17 15:18:57	1.52
+++ deliantra/Deliantra-Client/DC.pm	2006/05/17 16:17:01	1.53
@@ -157,6 +157,13 @@
    . $_[1]->content->present ($_[0])
 }
 
+sub view_verbatim {
+   (join "",
+       map +("\t" x ($indent / 2)) . "$_\n",
+          split /\n/, CFClient::UI::Label::escape ($_[1]))
+   . "\n"
+}
+
 sub view_textblock {
    ("\t" x ($indent / 2)) . "$_[1]\n\n"
 }