Index: openacs-4/contrib/packages/simulation/lib/object-display.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/lib/Attic/object-display.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/contrib/packages/simulation/lib/object-display.tcl	24 Oct 2003 12:27:01 -0000	1.5
+++ openacs-4/contrib/packages/simulation/lib/object-display.tcl	27 Oct 2003 07:31:55 -0000	1.6
@@ -28,7 +28,12 @@
     -revision_id $item(revision_id) \
     -array content
 
+if { [info exists content(text)] } {
 set content_html [ad_html_text_convert -from $content(mime_type) -to "text/html" -- $content(text)] 
+} else {
+    set content(text) ""
+    set content(html) ""
+}
 
 
 ######