Index: openacs-4/www/blank-master.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/www/blank-master.tcl,v
diff -u -r1.16 -r1.17
--- openacs-4/www/blank-master.tcl	13 Jan 2005 13:58:54 -0000	1.16
+++ openacs-4/www/blank-master.tcl	18 Mar 2005 18:10:39 -0000	1.17
@@ -33,12 +33,11 @@
 
 set onload {}
 
-# Handle htmlArea widget, which needs special javascript and css in the page header
+# Handle RTE widget, which needs special javascript and css in the page header
 global acs_blank_master__htmlareas
-if { [info exists acs_blank_master__htmlareas] } {
-    foreach htmlarea_id $acs_blank_master__htmlareas {
-        append header_stuff "<script type=\"text/javascript\">var editor_var_${htmlarea_id} = new HTMLArea(\"${htmlarea_id}\");</script>"
-        lappend onload "acs_initHtmlArea(editor_var_${htmlarea_id}, '${htmlarea_id}');"
+if {[info exists acs_blank_master__htmlareas] } {
+    foreach htmlarea_id [lsort -unique $acs_blank_master__htmlareas] {
+        lappend onload "acs_rteInit('${htmlarea_id}');"
     }
 }