Index: openacs-4/packages/acs-templating/tcl/richtext-or-file-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/richtext-or-file-procs.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/acs-templating/tcl/richtext-or-file-procs.tcl	10 Jan 2007 21:22:12 -0000	1.4
+++ openacs-4/packages/acs-templating/tcl/richtext-or-file-procs.tcl	21 Nov 2007 14:08:44 -0000	1.5
@@ -298,7 +298,7 @@
       }
 
       if { $storage_type eq "" || $storage_type eq "text" } {
-          append output {<script language="javascript"><!--} \n {acs_RichText_WriteButtons();  //--></script>}
+          append output {<script type="text/javascript"><!--} \n {acs_RichText_WriteButtons();  //--></script>}
 
           append output [textarea_internal "$element(id).text" attributes $text]
           append output "<br>Format: [menu "$element(id).mime_type" [template::util::richtext_or_file::format_options] $mime_type attributes]"