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.16 -r1.16.2.1
--- openacs-4/packages/acs-content-repository/tcl/filter-procs.tcl	12 Mar 2004 13:44:55 -0000	1.16
+++ openacs-4/packages/acs-content-repository/tcl/filter-procs.tcl	26 May 2004 18:43:52 -0000	1.16.2.1
@@ -244,9 +244,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