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 -r1.13.2.1
--- openacs-4/packages/acs-templating/tcl/richtext-or-file-procs.tcl	6 Dec 2018 21:24:17 -0000	1.13
+++ openacs-4/packages/acs-templating/tcl/richtext-or-file-procs.tcl	13 Jan 2020 16:30:28 -0000	1.13.2.1
@@ -291,7 +291,7 @@
       }
 
       if { $storage_type eq "" || $storage_type eq "text" } {
-          append output [subst {<script type="text/javascript" nonce='$::__csp_nonce'><!--}] \
+          append output [subst {<script type="text/javascript" nonce='[security::csp::nonce]'><!--}] \
               \n {acs_RichText_WriteButtons();  //--></script>} \
               [textarea_internal "$element(id).text" attributes $text] \
               [subst {<br>Format: \