Index: openacs-4/packages/acs-templating/tcl/richtext-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/richtext-procs.tcl,v
diff -u -N -r1.50 -r1.51
--- openacs-4/packages/acs-templating/tcl/richtext-procs.tcl	13 Nov 2010 23:55:58 -0000	1.50
+++ openacs-4/packages/acs-templating/tcl/richtext-procs.tcl	18 Feb 2011 01:55:23 -0000	1.51
@@ -616,11 +616,11 @@
     return $output
 }
 
-# handle richtext transformations using a standardized naming convention.
+ad_proc template::data::to_sql::richtext { value } {
 
-namespace eval template::util::richtext {}
+    Handle richtext transformations using a standardized naming convention.
 
-ad_proc template::data::to_sql::richtext { value } {
+} {
     return "'[DoubleApos [list [template::util::richtext::get_property content $value] \
                                [template::util::richtext::get_property format $value]]]'"
 }