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 -N -r1.41.2.3 -r1.41.2.4
--- openacs-4/packages/acs-content-repository/tcl/filter-procs.tcl	25 Aug 2020 14:37:14 -0000	1.41.2.3
+++ openacs-4/packages/acs-content-repository/tcl/filter-procs.tcl	29 Aug 2022 11:00:26 -0000	1.41.2.4
@@ -270,7 +270,9 @@
 }
 
 \# Ordinary text/* mime type.
-template::util::array_to_vars content
+foreach {key value} [array get content] {
+   set $key $value
+}
 
 set text \[cr_write_content -string -revision_id \$revision_id\]
 if { !\[string equal \"text/html\" \$content(mime_type)\] } {