Index: openacs-4/packages/acs-content-repository/tcl/filter-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/filter-procs.tcl,v
diff -u -r1.18 -r1.19
--- openacs-4/packages/acs-content-repository/tcl/filter-procs.tcl	5 Jun 2004 14:08:37 -0000	1.18
+++ openacs-4/packages/acs-content-repository/tcl/filter-procs.tcl	29 Jun 2004 10:17:36 -0000	1.19
@@ -264,9 +264,10 @@
 template::util::array_to_vars content
 
 set text \[cr_write_content -string -revision_id \$revision_id\]
+if { !\[string equal \"text/html\" \$content(mime_type\] } {
+    set text \[ad_html_text_convert -from \$mime_type -to text/html \$text\]
+}
 
-set text \[ad_html_text_convert -from \$mime_type -to text/html \$text\]
-
 set context \[list \$title\]
 
 ad_return_template