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 -N -r1.13.2.1 -r1.13.2.2
--- openacs-4/packages/acs-templating/tcl/richtext-or-file-procs.tcl	13 Jan 2020 16:30:28 -0000	1.13.2.1
+++ openacs-4/packages/acs-templating/tcl/richtext-or-file-procs.tcl	30 Nov 2023 15:13:28 -0000	1.13.2.2
@@ -249,12 +249,9 @@
 } {
   upvar $element_reference element
 
-  if { [info exists element(html)] } {
-    array set attributes $element(html)
-  }
+  array set attributes \
+      [::template::widget::merge_tag_attributes element $tag_attributes]
 
-  array set attributes $tag_attributes
-
   if { [info exists element(value)] } {
       set storage_type [template::util::richtext_or_file::get_property storage_type $element(value)]
       set mime_type    [template::util::richtext_or_file::get_property mime_type $element(value)]